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1.0 



Introduction 

The Software Dispatch is a cumulative report (updated 
monthly) which provides each subscriber with a quick 
reference library of: 

1 . Announcements of new sof tv/are '"•roducts • 

2. Current software status - outstanding problems 
and problems with solution. 

The name Software Dispatch was chosen in accordance with 
its definition. 



( 



"... a written message; pa:irticularly an official 
communication sent with speed . " 

With this in mind, it is our intent to assure the sub- 
scriber of timeliness and technical quality. 

Comments and suggestions from our readers are welcome. 
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2.1 



2.2 



How to Use Your Software Dispatch 

The Software Dispatch is intended to supplement your 
software and aid in its maintenance. Updates will be 
supplied monthly to subscribers. 

Changes to relocatable/absolute files/programs will 
be based on the current version and edit number of the 
file/program. It is recommended that users make all the 
published patches. Users possessing source files are 
suggested to make the indicated source level changes 
and suitably update their Software System. 

Introductory Section 

This introductory material should be filed at the be- 
ginning of your notebook and will be referred to as 
chapter and paragraph numbers. To date, these are the 
chapters in the Introductory Section: 

1.0 - Introduction 

2.0 - How to Use Your Software Dispatch 

3.0 - Software Manuals for DOS /BOSS 

For example, if a new paragraph were to be inserted as 
the fifth paragraph of Chapter 1, the article would 
have a chapter and paragraph number of 1.5 (or section 
1.5) . 

General format of the article 

Each article is formatted so that you can easily recognize 
to what the article refers. 

This is an overall example of the format. Each part will 
be explained in detail. 
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DATE 


© TITLE 
d) SUBTITLE 

© PROBLEM: ^l) Functional 
^^-^ Description 

© DISPOSITION: 




(e) coding 
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Title 

The title of articles pertaining to programs include 
the latest Version and/or Edit number (whichever 
applicable) . Source level changes will always change 
the Edit number, e.g., Edit #052 to Edit #j2f53. The 
Version number will be changed, if applicable, e.g., 
V6A to V7A. A change to core image system programs 
(via binary patches) will change the version number, 
e.g., V6A to V6B, and the Edit number remains the 
same. Changes to relocatable files will appear only 
in the form of source code changes. 

Subtitle 

This brief statement gives the reader a hint about the 
content of the article. The subtitle is used in the 
Table of Contents for identifying the problem. 

Problem: 

A paragraph or two is used to describe the problem 
in general terms. It may include examples, warning, 
etc. 

The purpose of this paragraph is to make the user 
aware of an existing problem in the software and 
its documentation. 

(cy In some cases, the text of the article contains a 
^-^ functional description which may not have been in- 
cluded in the system software document. 

f dJ Disposition: 

This is the section of the article which tells the 
reader the status of the problem. The disposition of 
the problem may be one of the following categories: 

** No Disposition 

An article just states the problem and will 
not have an answer. This is to inform you that 
we are aware of the problem, but at this time 
there is no fix available. 
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° Solution 

If there is a way to avoid the problem, or 
a patch to fix it, it is stated here. 

In some articles you will find that the only 
solution given is "fixed in the next version". 

Coding 

This block is used for filing purposes and is further 
expanded in section 2.3. 



Filing 

A system has been devised to help you file each article 
in its proper place. The key to this system is the block 
at the bottom of the page. 

Below is a close-up view of the coding block for Systems 
Software. 



Softvrare Product 

(1) 


Version 
(lA) 


Component 

(2) 


Version 
{2A) 


Edit' 
(2B) 


Subprogram or Additional Information 

(2C) 


Sequence * 
(3) 


PAGE 
OF (3A) 


|s)«w R«plac«m«nt Article 
1 (4)| LiSlJ 


Original Dale 

(5A) 



( 



Each month, you should take the update and insert the 
pages in your notebook according to the following instruc- 
tions. 

First, the article is filed by Software Product (1) . In 
this case, all articles will be classified under the major 
heading . 

Secondly, the Software Product is broken down by its 
components (2). See section 2.3.1 for the list of 
DOS/BOSS Components. 
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Lastly, the article is referenced by sequence # (3) . 

As an article is added to each component, it is assigned 

the next highest sequence number. 

All other information in the coding block is to further 
clarify the article and not specifically for filing. 

Explanation of all the other information included in the 
coding block follows: 

(lA) Version of the entire Software Product. 

(2A) Version number of components. 

(2B) Edit numbers. 

(2C) If more information is necessary to help the user, 
it will be inserted in this block. 

(3A) This block indicates how many pages the article 
has. 

(4) A new article is indicated by an "X" in this block. 
This article has not been published before. 

(5) An article which was previously published and is 
being published again for reasons of revision or 
correction is indicated by a number in this block. 

The number in the block specifies the number of 
times the original article has been revised. 

For example: the second revision of an article 
which originally appeared in June, 1973 would be 
indicated as follows: 



CD 



Replacement Arti cle 



Original Dale 

June, 1973 



( 



(5A) 



The customer will find the date of revision #2 in 
the upper right corner of the article. 

Original date of a revised article is placed here. 



2.3.1 



COMPONENTS 



A list of the components and program names for DOS/BOSS 
along with relevant comments is found below. The component 
names always appear in the coding block for filing purposes. 
The program names, used only if necessary, appear in the 
coding block under "additional information" and are not 
used for filing. 

Articles concerning changes to manuals will be coded 
and filed along with changes to programs. For example, 
an article containing a binary patch to the CHAIN pro- 
gram could be followed by an article amending the 
CHAIN and EXECUTE manual. Changes to the monitor 
manuals and other general system documents will appear 
under the code MONITOR. 

DOS-15: 



Components 
BOOTSTRAP 

CARD READER HANDLERS 



Additional 




Information 


Comment 


REBOOT 


RF Disk Bootstrap 


RPBOOT 


RP Disk Bootstrap 


CD. DOS 


Non-Batch Card Reader 




Handler 


DOSBCD 


Batch Card Reader 




Handler 



( 



CHAIN 

DDT 

DECTAPE HANDLERS 



DISK HANDLERS 



DTA. 








DTD. 








DTE. 








DTP. 








DKA. 


RF 


Disk 


Handler 


DKB. 


RF 


Disk 


Handler 


DKC. 


RF 


Disk 


Handler 


DKL. 








DPA. 


RP 


Disk 


Handler 


DPB. 


RP 


Disk 


Handler 


DPC. 


RP 


Disk 


Handler 


DPL. 
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COMPONENTS (Cont'd) 
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DOSSAV 






DTCOPY 






DUMP 






EDITOR 






EDITVP 






EDITVT 






EXECUTE 






FOCAL 




FOCAL 
FNEW 


FORTRAIn' 




COMPILER 
OTS 


LINKING 


LOADER 


.LOAD 


LINE PRINTER HANDLERS 


LPA.J2f9 






LPA.15 






LP. 647 


LK35 KEYBOARD HANDLER 


LKA. 


MACRO-15 




MACRO 
CREF 


MAGTAPE 


HANDLERS 


MTA. 
MTC. 
MTF. 



System 

save/restore program 



object time system 
utility routines 
relocatable file loader 

PDP-9 Line Printer Handler 
PDP-15 Line Printer Handler 
647 Line Printer Handler 



cross reference program 



MONITOR 



DOSNRM Non-Resident MONITOR 
RESMON Resident Monitor 
TELETYPE HANDLER 



PAPERTAPE PUNCH HANDLERS 



PPA. 
PPB. 
PPC. 
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COMPONENTS (Cont'd ) 

PAPERTAPE READER HANDLERS PRA. 

PRE. 

PATCH 

PIP 

QFILE 

SRCCOM 

SYSTEM 



all system information that 
does not fall under any 
other component will appear 
here. 



SYSTEM GENERATOR 

SYSTEM LOADER 

UPDATE 

VP15 GRAPHICS 



VT15 GRAPHICS 



8TRAN 
89TRAN 



SGEN 
.SYSLD 



VPA. 

VPA.S 

FORT 

NUVAL 

VECTOR 

VTA. 

VTPRIM 

LTORPB 

DYLDR 

TRACK 

ROTATE 

CIRCLE 



system program loader 



BOSS-15 : 
MONITOR 
PROCEDURE FILES 



B.PRE 
NRBOSS 



pre-processor 
non-resident monitor 
The additional information 
may contain any of the 
procedure files listed in 
the BOSS-15 USERS MANUAL. 
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3.^ DOCUMENTATION FOR DOS-15 SYSTEM 
A. Required Documentation 
DOS USERS MANUAL 
FORTRAN IV LANGUAGE MANUAL 
FORTRAN IV OPERATING ENVIRONMENT 
PIP DOS MONITOR UTILITY PROGRAM 
SGEN DOS UTILITY PROGRAM 
DOS KEYBOARD COMMAND GUIDE 
DOS SYSTEM MANUAL 



DEC-15-0DUMA-A-D 

DEC-15-GFWA-D 

DEC-15-GFZA-D 

DEC-15-YWZB-DN13 

DEC-15-YWZB-DN12 

DEC-15-NGKA-D 

DEC-15-0DFFA-A-D 



B, 
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Suggested Additional Manuals 

PDP-15 MACRO-15 ASSEMBLER DEC-15-AMZB-D 

FOCAL PROGRAMMING MANUAL DEC-15-KJZB-D 

PDP-15 8-TRAN MANUAL DEC-15-ENZA-D 

PDP-15 DDT UTILITY PROGRAM DEC-15-YWZA-DN1 

PDP-15 CHAIN & EXECUTE UTILITY PROGRAM DEC-15-YWZB-DN2 

PDP-15 MTDUMP UTILITY PROGRAM DEC-15-YWZB-DN4 

PDP-15 PATCH UTILITY PROGRAM DEC-15-YWZB-DN5 

PDP-15 EDIT UTILITY PROGRAM DEC-15-YWZB-DN6 

PDP-15 UPDATE UTILITY PROGRAM DEC-15-YWZB-DN7 

PDP-15 LINKING LOADER UTILITY PROGRAM DEC-15-YWZB-DN8 

PDP-15 SRCCOM UTILITY PROGRAM DEC-15-YWZB-DNll 

VT15 GRAPHICS SYSTEM PROGRAMMING MANUAL DEC-15-ZFSB-D 

VP15A GRAPHICS SOFTWARE MANUAL DEC-15-UXSB-D 
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BOOTSTRAP 

Programming Note Regarding .GET & .PUT MACROS 

In DOS-15, .GET and .PUT MACRO'S use the bootstrap for com- 
munication with the system device. On DECdisk systems, the 
bootstrap will ignore unit niimbers in .PUT MACRO'S. It will 
assume unit zero. 

The source name of the RF DECdisk Bootstrap is REBOOT jelll 

The source name of the RP02 Bootstrap is RPBOOT 003 



Software Product 



Version 



JOA 



Component 
Bootstrap 



Version 



N/A 



FM-.tH 



Subprogram or Additional Information 



Sequence * 

1 



PAGE 
1 OF 1 



New 
X 



Replacement Article 



CD 



Original Date 
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bUOTb'i'RaP 

Programming Note on Special Bits Meaning in Reserved Word 

There is an important transfer vector in the Bootstrap, 
located in word 17777 of the highest bank. The high order 
three bits of this word are reserved for the Monitor, and 
have the following meanings: 

WORD BIT MEANING 

17777 l=In batching mode 

j2f=Not in batching mode 

1 1=$J0B ASCII line or 

card just read by 
batch device 
j2f=Last line or card 
not $JOB 

2 l=Batch device is card 

reader 
!2^=Batch device is paper 
tape reader 

The system loader will refresh the Resident Monitor's patch 
area only on a bootstrap load or restart. This allows 
coiranunication between two programs that require a new 
system configuration. 
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Bootstrap 
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CD. DOS (EDIT #012) and DOSBCD (EDIT #(y|?3) 
Handler for the CR15 Card Reader 



The card reader handler (CD. DOS) has undergone the following 
modifications. It should be noted that none of these changes 
were implemented in the batch card reader handler (DOSBCD) . 

1. Defining the parameter "CR15=J2(" for assembly obtains the 
CR15 version of the card reader handler. The CR15 is a 

and can handle a variety of card readers up to the 1^^^ 
card per minute model. 

2. The card reader handlers will recognize two different 
punches for end-of-file (EOF) cards- 

a. All rows punched in column one (ADSS-15 usage) 

b. The 12, 11, 0, 1 multi-punch in column one 

3. The card reader now returns an EOF code {1.605) instead 
of an EOM code {Ij6j66) . 

4. When a hopper empty, stacker full, or reader not ready 
condition arises, the following expanded message follows 
the I0PS4: 

'CD NOT READY' 

5. If a card is encountered with an illegal card punch the 
message 'I0PS4 CD- ILLEGAL PUNCH' is printed. At this 
point the user can punch the card correctly and continue 
by typing CTRL R. 

Restrictions: 



DOSBCD 003 may not be used as a batch device handler for 
tne CR15 device. It may, however, be used as an input 
device handler. 
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Version 
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Edit' 


Sobprogrom or Additional Information 
CDB. 


Sequence ' 
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PAGE 
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New Replacement Article 
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CD. DOS (EDIT #013) 

Problems when conditionalized for the CR15 card reader 
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Problem: The handler did not handle any error condi- 
tions properly. On errors like pick fail- 
ure, block missed, data missed, motion error 
and photo error the handler moved (offset) 
the card to the reader station and exited 
without issuing a message or a .READ MACRO. 

As a result of the above the system would 
hang up. 

Correction: Since all errors are potentially recoverable 
the new version of the handler issues an 
expanded error message "I0PS4 ERR,CHK-CD, 
RLD-CD" permitting continuation of operation 
by reloading a fresh image of the bad card. 

The user has the option of aborting the 
.READ operation by typing tP/fC. 

Problem: The handler temporarily returned an EOF (in 
the line buffer header word pair (HWP) ) on 
exit from a .READ MACRO. When the interrupt 
was received the HWP was set to the appro- 
priate value. 

Although this does not affect the user since 
he cannot process the data being read until 
it is complete, it is logically erroneous 
and time-wise wasteful. 



Correction: Do not alter the HWP. 

The following SRC level changes to CD. DOS edit ij6l2 , correct 
these problems. 



c 
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PAGE 7 



CD. DOS 013 



READ 



204 
205 
206 
207 

224 
225 
226 
227 
228 



00100 R 100214 R 

00101 R 767000 A 

00117 R 440755 R 

00120 R 200033 R 

00121 R 040143 R 



.TITLE .READ 

/INITIATE READ TO CARD READER. 

CDREAD JMS lOUWAY /ARE WE DONE YET 

LAW 7000 /YES, PICK UP CAL 



ISZ CDARGP 
LAC CDRBMP+1 
DAC CDRRET 
. IFDEF NOTGDI 
CURRTN CREF 



/BUMP TO RETURN 

/SET RETU 
/FROM REA 

/EOF BUTTON OR HO 



PAGE 
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CD. DOS 013 


603 






604 






605 


00460 


R 741000 A 


647 


00475 


R 040772 R 


648 


00476 


R 501020 .R 


649 


00477 


R 751200 A 


650 


00500 


R 600537 R 


651 


00501 


R 200772 R 


652 


00502 


R 501021 R 


653 


00503 


R 541004 R 


654 


00504 


R 600537 R 


655 


00505 


R 140760 R 



CDB. CARD READER INTERRUPT HANDLING SECTION 



.TITLE CDB. CARD READER INTERRUPT 
/CARD READER INTERRUPT SECTION. 
CDRINT SKP /CONTROL COMES HE 



DAC CD STAT 

AND . (400 

SNAlCLA 

JMP CROONE 



LAC CDS TAT 
AND (037000 
SAD (2000 
JMP CRDONE 
DZM CDIOSW 



/AND SAVE 
/TROUBLE BIT 

/SKIP ON TRO 
/NO ERRORS 



/TROUBLE??????? 
/WHAT TROUBLE? 
/HOPPER EMPTY? 
/YES, DONE RETURN 
/TO ENABLE CTL P 
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CD. DOS 013 


COB. CARD READER 


INTERRUPT HANDLING SECTION 


656 


00506 


R 


760020 


A 


LAW 20 


/CLEAR INTERRUPT 


657 


00507 


R 


706704 


A 


CRLC 




658 


00510 


R 


760004 


A 


LAW 4 


/OR READER; PRIN 


659 


00511 


R 


121012 


R 


JMS* (EXERRS 


/lOPS 4 MESSAGE 


660 


00512 


R 


600522 


R 


JMP CDRST 


/TRY AGAIN, REST 


661 


00513 


R 


777772 


A 


LAW -6 




662 


00514 


R 


052222 


A 


.SIXBT /ERR CHK-CD. RLD-CD/ 




00515 


R 


400310 


A 








00516 


R 


135503 


A 








00517 


R 


045440 


A 








00520 


R 


221404 


A 








00521 


R 


550304 


A 






663 


00522 


R 


201022 


R 


CDRST LAC (JMP CDIRET /RESTRORE RE 


664 


00523 


R 


040143 


R 


DAC CDRRET 


/ADDRESS 


665 


00524 


R 


600123 


R 


JMP CDOK+1 


/RESTART READ 


666 










• ENDC 




667 


/ 




668 


00525 


R 


060043 


R 


DAC* CDIPTR 


/INSERT THIS COL 


669 


00526 


R 


440043 


R 


ISZ CDIPTR 


/BUMP BUFFER POl 


670 










•IFDEF NOTGD 


I 
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CHAIN V7A (EDIT #148) 
Prograinming Notes 
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CHAIN will accept library indicators (#) on internal and 
external link components. The name given must correspond 
to the GLOBAL name of the routine desired in the library. 
Also note that the .lODEV Pseudo-op should come after the 
.GLOBL Pseudo-op so that CHAIN will not skip over the 
.lODEV information when doing a library search. 

CHAIN will accept .lODEV information from -18 thru +71 
decimal. This is so that it can accommodate the 77 octal 
•DAT slots allowed DOS-15 by the system. 

CHAIN will do a .USER for the "PAG" or "BNK" UIC on .UFDT 
- 1 if the "PGR" or "BKR" option respectively is given. 
This is so the correct system library will be searched for 
the relocation mode in effect. 

Since I/O handlers are in the "lOS" UFD as separate files, 
the user must transfer to his UFD, using PIP, any handlers 
he may want to include in his overlay system. Also, the 
user must include the handler's file name (global name) 
in the link description command string. 

CHAIN calculates the number of 4j?0(8) word blocks needed to 
store the overlay system, by links, as a core image. This 
information is stored in the environment indicator in bits 
through 11 as a right- justified octal number. This total 
does not include the link table (link 377777) or the resident 
code (link 0) . 

There is an option in CHAIN which allows the user to restrict 
COMMON areas to bank boundaries. This is useful to the VT15 
user who builds display files in COMMON, since the VT15 cannot 
cross bank boundaries directly (i.e., 13-bit addressing). 
There are two forms of the option and the giving of one will 
cancel out the other form if it was given previously. 
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Programming Notes (Cont'd ) 

"Vtc" option without names restricts all common areas to 
bank boundaries. The "VTC" option is delimited by being the 
first option in the command string or by a comma on the left, 
and by a comma or altmode on the right. 

"VTC/NAM1,NAM2, . , .NAM3/" option with names restricts to bank 
boundaries only those COMMON areas named (note: blank 
common is .XX). More than one VTC option with names may be 
given in the command string and all names specified will be 
restricted. The option is delimited by being the first 
option in the command string or by a comma on the left, and 
a slash on the right. The name field within the option is 
delimited by a slash right after the "VTC" and the slash 
that terminates the option. Names in the list are separated 
by commas. 



Notes: 

The "VTC" option will not restrict common areas declared in 
BLOCK DATA SUBPROGRAMS. 

The common area will be restricted to bank boundaries even 
if CHAIN is running in page relocation mode. 

CHAIN ignores the Linking Loader code '33'. 
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Clarification of obscure points 
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Note on operation of CHAIN: 

1. Routines/subroutines declared as part of the resident 
code by using the library indicator (#) in the command 
string are entered into a dummy global symbol table. 
Hence, it is necessary for a ".GLOBL name" identical 
to the name accompanying the "#" to be present within 
the routine to be called. An identical file name is 
not sufficient; in fact, file names are ignored when 
searching for library indicator (#) routines. In the 
absence of this declaration, the error message 
"UNRESOLVED GLOBAL" will result. 

2. CHAIN scans the user library (.LIBR5) before scanning 
the system library (.LIBR) to load library routines 
and to resolve unresolved globals. 

3. CHAIN Vl^A (supplied with DOS-15 V3A forthcoming update 
release) will resolve globals in a manner similar to 
the LINKING LOADER. 

Restrictions in building an overlay structure: 

Pages 12 and 13 of the CHAIN & EXECUTE manual define a set 
of rules that govern the building of an overlay structure 
through the definition of links and structures. 

There are a few overlay structures that cannot be defined 
within the framework of these rules. Any attempt to define 
one of these overlay structures will result in the printout 
of any one of the appropriate error messages. 

An example of one such overlay structure that cannot be 
built follows. 
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structure 
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The following attempt to define this overlay structure will 
cause the error message indicated to be printed out. 

>LA=A 

>LB=B,BA 

>LC=C,CA 

+COMPONENT NAME USED AS LINK NAME BA 
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It is possible to define the above overlay structure by the 
definitions: 

>A : B , BA 
>B:C,CA 
>CA:CB 
>BA:BB:BC 

In general there can be only one link in an overlay structure 
whose link components, if any, are allocated contiguously in 
core (as in link "C, CA"). Hence, there will be holes in core 
if an overlay structure like the one above is built. 
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CHECKOUT PACKAGE 



Functional Description 



The following is a description of the Software Checkout 
Package. The description and the paper tape are distributed 
as part of the system. See DOSSAV Operating Instructions 
for installing the system. 



( 



1.0 INTRODUCTION 

The purpose of the checkout package is to show that the 
system has been properly installed onto DECdisk or Disk 
Pack. It does so by briefly testing all the basic 
pieces of the system. The following is a list of pro- 
grams tested: 

1. Resident and Nonresident Monitors 

2. PIP 

3. FORTRAN Compiler and Object Time System 

4. Macro Assembler 

5. Linking Loader and System Loader 

6. Chain and Execute programs 

7. System Device Handler (DECdisk or Disk Pack) 

8. Paper Tape Reader Handler 

9. Teleprinter Handler 

10. Batching Mode System Commands 

11. DOSSAV system SAVE/RESTORE program 



2.0 IDENTIFICATION 

The batch paper tapes for the Checkout Package are 
identified as follows: 



RF.CHK DEC-15-CIDA-PA 
RP..CHK DEC-15-CTAA-PA 



(for the RF15 DECdisk 

System) 
(for the Rp.jaf2 Disk Pack 

System) 
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Functional Description (Cont'd) 



3.0 CHECKOUT PACKAGE RESULTS 

The result of the FORTRAN Object Time System (shortly after 
the GLOAD Command) should be: 

-0.1235E+03 

Also, the result of the Chain and Execute programs should 
be: 

-J2(.1234E+j2f5 



4.0 CHECKOUT PACKAGE OPERATION 

The following are the procedures for an RF DECdisk system 
having two (2) platters or an RPJJ2 system. 

Take the ASCII paper tape labeled 'RF.CHK' (or RP.CHK, if 
Disk Pack system) , and place it in the high speed paper 
tape reader. Then type: 

BATCH PR^ 

The Batch commands will then run the checkout package to 
completion and will so indicate on the teleprinter, 
before leaving Batch Mode. 

4.1 The following are the procedures for an RF DECdisk system 
having only one (1) platter and DECTAPE: 

1. Load the System Software (following the 
DOSSAV Operating Instructions) . 

2. When the system monitor announces itself, 
type in the current date: 
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Functional Description (Cunt'd) 

Example: 

11/29/71 

3. Mount a scratch tape on DT Unit #1 and write enable. 

4. Type the underlined commands which follow: 

$ LOGIN PER J 

$ PIP^ 

>C DTl-<- DK^ 



>N DkJ 



( 



( 



5 
6 



> tc 

Now again read in the RF Bootstrap, and enter the 
date which the monitor requests. 

Take the ASCII paper tape labeled RF.CHK and place 
it in the high speed papertape reader, then type: 



$ BATCH 



PR^ 



The Batch Commands will then run on the Checkout Package 
to completion and will so indicate on the teleprinter - 
before leaving Batch Mode. 

4.2 SPECIAL PROCEDURES FOR MAGTAPE USERS: 

The following are the procedures for an RF DECdisk system 
having only one (1) platter and MAGTAPE: 

1. Load the System Software (following the 
DOSSAV Operating Instructions) . 
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Functional Description (Cont'd) 



2. When the system monitor announces itself, type in the 
current date: ex: 11/29/71 

3. Mount a scratch magtape on MAGTAPE UNIT #1 (have it 
write enabled) 

4. Type the underlined commands which follow: 
$ LOGIN PER^ 



$A MTF 
$PIP^ 
>T MTl 


11^ 
(A)^DK DOSBCD 003 J 




>T 
>T 


MTl 
MTl 


(A)-^DK CD. DOS 012 ) 
(A)-^DK FNEW 00 A J 


>T 


MTl 
MTl 


(A)^DK LPA.15 0^2 J 


>T 


(B)-*-DK DYLDR BIN^ 


>T 


MTl 


(B)-f-DK TRACK BIN^ 


>T 


MTl 


(B)^DK VTPRIM BIN^ 


>T 


MTl 


(B)-^DK ROTATE BIN>) 


>T 
>T 


MTl 
MTl 


(B)-<-DK NUVAL BIN^ 
(B)-«-DK FORT BIN J 


>T 


MTl 


(B)^DK VECTOR BIN J 


>T 


MTl 


(B)-^DK CIRCLE BIN^ 
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functional Description (Cont'd) 
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>T 


MTl 


(B)^DK 


LPA.j2(9 


BIN^ 


>T 


MTl 


{B)^DK 


F4X9 BIN J 


>T 


MTl 


(B)-^DK 


VPA.S 


BIN^ 


>T 


MTl 


(B)-^DK 


LP. 647 


BIN^ 


>T 


MTl 


(B)-s-DK 


T.TORPB 


BIN^ 



> N DK J 



> tc 



5. Now again read in the RF Bootstrap, and enter the 
date which the monitor requests. 

6. Take the ASCII paper tape labeled RF.CHK and 
place it in the high speed papertape reader, 
then type: 

$ BATCH PR J 

The Batch Commands will then run the Checkout Package to 
completion and will so indicate on the teleprinter - 
before leaving Batch Mode. 
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DDT V9A (EDIT #010) 
Programming Notes 
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DDT identifies itself as DDT Vnn for page mode loads, and 
BDDT Vnn for bank mode loads. 

DDT allows breakpoints on floating point instructions. 

After nonrecoverable lOPS errors, DDT awaits a CTRL T 

y\a-fr^r~o cr-urt- T nn "i nrr . 
.^S^w^w ^ — •• — 3- 

DDT uses the tabbing mechanism in the teleprinter handler, 
instead of multiple spaces, for output. This makes DDT 
smaller and when using Model 35 teletypes faster on tabbing 
output. 

The routine to print octal numbers has been shortened, and 
a problem with zero suppression has been corrected. 

DDT had a problem in setting .SCOM+2 incorrectly, so that 
about 500 registers were unusable. This problem has been 
fixed in version V9A. 
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DTA. (EDIT #020) 
Functional Change 



The DTA handler has been modified to use dynamic buffer 
allocation. The new size is approximately 27508 — this is 
smaller than the old DTB version. For this reason, DTB has 
been deleted from the system. DTA. still has only three file 
capacity. If a user attempts to use more than three files 
at once on DECtape, an lOPS 17 error will result. 

The last block of a file on DECtape has a forward data link 
of 777777. If the user tries to read past this block DTA 
will return the end-of-file sequence (001005,776773) in the 
user's buffer. Subsequent .READ'S will continue to pass 
back the same two words. This corrects a problem that occurred 
in PIP when reading in dump mode and when the 001005, 776773 
sequence was part of the data being transferred, with still 
more data following it. 

NOTE: 



None of the above changes has been made to the DTC, DTD,. 
DTE., or DTF., DECtape Handlers. 
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DTA. (EDIT #021) 

Source Change to prevent .WAIT X from getting a buffer 

Problem: 

In Edit %020 of the DTA. handler, when a .WAIT X is issued 
after a .CLOSE X the handler gets a buffer. As a result 
when there are "B" buffers in a system and when B+1 files 
are accessed sequentially on B+1 DAT slots (B assigned to 
DT's and 1 assigned to some other device) the message - 

"lOPS 55" (NO BUFFERS AVAILABLE) 
is printed. 
If all the B+1 slots are assigned to DT's the message 

"lOPS 17" (TOO MANY FILES FOR HANDLER) 
results. 
Solution: 

The above restriction is removed by preventing .WAIT from 
getting a buffer. 

Below are the changes in the source code for DTA 020. 
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Source Change to prevent .WAIT X from getting a buffe r (Cont'd) 



LOG OCTAL LABEL INST 



COMMENT 



042644 DTA. 



DAC CALP /CAL POINTER 



15 


042646 


DAC TEMP 2 


/T STORE DATA MODE OR 
/SUBFUNCTION 


16 


222642 


LAC* ARGP 


/CHECK IF 


17 


502700 


AND (77 


/FUN. IS 


20 


542701 


SAD (12 


/.WAIT/.WAITR? 


21 


600177 


JMP DISPCH 


/YES GO TO DISPCH, 
/DO NOT GET BUFFER 


22 


222644 


LAC* CALP 


/NO, GET DAT SLOT 
/(9-17) 



This problem will be corrected in version DTA Edit #021, 
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DECTAPE HANDLERS 

Support of .TRAN Function on PDP-8/l)2f/ll Tapes 

The DECtape handlers in the system (except for DTF.) can be 
utilized to transfer data from PDP-8/l|?/ll using the .TRAN 
function. 

In order to realize the above a minor source modification is 
needed to the handlers that support the .TRAN function. The 

■1 n e -h -rn r<t* 1 nn 

AND (7777 /clear possible erroneous data 

must be inserted after the location DTSRCK+2, i.e., after the 
instruction, 

LAC DTBCA 
in DTA. , DTD. & DTE. 

This is necessary because these tapes have 12 bit block 
numbers with erroneous data in the most significant bits. 

Note that since the file structure on these tapes are different 
from the DOS-15 file structure, only the .TRAN function will 
work . 

This information is provided for user's convenience only and 
should not be misconstrued as a feature that will be supported 

by DEC. 
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DISK HANDLERS 

Programming Note on Use of .USER Macro 

The Disk Handlers retain the UIC from the .UFDT in the Busy 
Table entry for each particular .DAT slot. Thus, changes 
made in the .UFDT via .USER macros will not become effective 
until a new Busy Table is established for the affected .UFDT 
slots. 

Since the I ^0 macros to the dislc handlers ip.a^' or m.a'^ not 
establish a new Busy Table entry, depending on a variety of 
conditions, this article will only give one example of 
incorrect usage, and then give a recommended procedure. 

The following sequence: 

.USER 1,ABC 

.INIT 1 

.USER 1,CDE 

.SEEK 1,FILE 

will cause a .SEEK for FILE under the UFD called ABC. If 
FILE is really under the UFD called CDE, the programmer should 
have written 

.USER 1,CDE 

.INIT 1 

.SEEK 1,FILE 

Programmers should ensure that all .USER macros are immediately 
preceded by any one of the following macros: 
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Programming Note on Use of .USER Macro (Cont'd ) 

. CLOSE 
.RENAM 

.MTAPE (rewind) 
. DLETE 
or immediately followed by a .INIT. 
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UUbSAV V2a (i:;;dit #043) 
Operating Instructions 
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DOSSAV is the system save/restore program. It resides on a 
paper tape, which must be KRM loaded at 3772)2( (restart at 
345)2(0) . 

It saves and restores to/from DECdisk, Disk Packs, DECtape 
and Magtape. A DECdisk system can be saved on and restored 
from DECtape, Magtape and Disk Pack. A Disk Pack system can 
use DECtape and Magtape. 

Once loaded, it asks for all necessary information, such as 
input and output devices, unit numbers and, in the case of 
Magtape - parity and density. 

GENERAL INSTRUCTION: 

The user must type Carriage Return after all entries, includ- 
ing the character typed to restart after errors. 

A. Restoring Systems 

The following examples illustrate how to put the systems 
distributed by Digital on DECtape or Magtape onto a DECdisk 
or Disk Pack. The user responses are underlined. 

1. To restore a DECdisk system from DECtape (on Unit 1) 

DOSSAV V2A 

INPUT DEVICE? DTV 

UNIT NO? 1^ 

OUTPUT DEVICE? DkJ 

DATE CREATED: 2 8-SEP-71 

TAPE DONE. MOUNT ANOTHER At this point, mount tape 2 

and type any character on the 
keyboard followed by a 
Carriage Return. 
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Operating Instructions (Cont'd ) 



NOTE: If DK is typed, no unit # is requested. 

II. To restore a DECdisk system from Magtape (on Unit 0) 



DOSSAV V2A 
INPUT DEVICE? MTV 
UNIT NO? 0) 
TRACK (7 OR ' 
DENSITY (2 
PARITY (E OR 

OUTPUT DEVICE 

DATE CREATED: 28-SEP-71 



)R 9)? Jj) 
1,5,8)? sT 
0)? oT 

2: DKJ 



NOTE: ALL SYSTEM RESTORE MAGTAPES DISTRIBUTED BY DIGITAL 
ARE 800 BPI, ODD PARITY. 



III. To restore a Disk Pack system from DECtape (on Unit 1) 

DOSSAV V2A 

INPUT DEVICE? DT^ 

UNIT NO? IJ 



OUTPUT DEVICE? DP^ 
UNIT NO? 0^ 

DATE CREATED: 28-SEP-71 
TAPE DONE, MOUNT ANOTHER 



At this point, mount Tape 
2 and type any character 
on the teleprinter follow- 
ed by a Carriage Return. 
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Operating Instructions (Cont'd ) 



IV. To restore a Disk Pack 



DOSSAV V2A 

INPUT DEVICE? MtJ 

UNIT NO? I^ 

TRACK (7 OR 9)? l) 

DENSITY (2,5,8)? %J 

PARITY (E OR 0)? Oy 

OUTPUT DEVICE? np^ 



UNIT NO? ^J_ 
DATE CREATED: 



28-SEP-7I 



It is possible to restore a software system to the DECdisk 
which was created for a machine smaller (different # of 
DECdisk platters) than the one being restored to. DOSSAV 
does all the necessary adjustments of the SAT's^. Therefore, 
the restore tapes issued by Digital for a 1 platter system 
can be restored to any system. Note that this should only 
be done with the Master tape(s), which have block 1775g free. 
That block may be needed during the restore for 5 or more 
DECdisk platters. Note that it is not possible to restore 
a software system which is larger than the hardware. (e.g., 
no restore of a 3-platter to one-platter configuration.) 

E. Saving Systems 

Once the user has tailored the system to his specific con- 
figuration, he will want to save that system for future 
restorations. To do that, simply reverse the procedure above, 
To illustrate, consider example 1 above and the changes 
necessary to it to create a restore tape. 

To save a DECdisk system to DECtape (on Unit 1) : 



^SAT's: Storage Allocation Tables - i.e., bit maps, 
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Operating Instruction (Cont'd ) 



DOSSAV V2A 

INPUT DEVICE? DK4) 

OUTPUT DEVICE? DT J 

UNIT NO.? 1^ 

TAPE DONE. MOUNT ANOTHER At this point, mount another 

tape and type any character 
on the keyboard followed by 
a Carriage Return. 

Note that DOSSAV allows for as many DECtapes and Magtapes 
as are necessary to hold the system.. 

C. Error Conditions and Messages 

Recoverable errors during command string decoding: If a 
question is answered incorrectly, DOSSAV outputs an appro- 
priate error message and then repeats the question. These 
error messages are: 



( 



ILLEGAL DEVICE 



BAD TRACK 



BAD DENSITY 



An illegal device mnemonic was 
typed (something other than DP, 
DK,DT and MT) or an illegal 
combination of devices was typed 
(i.e., input = DT and output 
= MT) . 

Something other than 7 or 9 was 
typed. 

Something other than 2(2p^p^) , 
5(556) or 8(8j2(JJ) was typed. 
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Operating Instructions (Cont'd ) 



BAD PARITY 



( 



Something other than E(even) or 
O(odd) was typed. 



Recoverable errors during operation: If it is possible to 
recover from an error, DOSSAV will attempt to do it. The 
error message will be output to the console. After the 
problem has been corrected, any character on the keyboard 
followed by a Carriage Return will resume operation. 



TAPE NOT READY 



DISK NOT READY 



DISK PACK NOT READY 



The DECtape or Magtape unit is 
off line or not write enabled. 

DECdisk is write locked. 

The disk pack unit is not ready. 



Unrecoverable errors^: Primarily hardware errors, from which 
DOSSAV cannot recover. After the error message has been 
output, DOSSAV restarts. 

DECTAPE ERROR 
MAGTAPE ERROR 
DISK ERROR 
DISK PACK ERROR 



ATTEMPT TO RESTORE 
SYSTEM TO WRONG DISK 



To protect users who have access to 
both a DECdisk and a disk pack and 
who may have several sets of restore 
tapes, all restore tapes are created 
with the mnemonic of the disk type 
in the first SAT. DOSSAV then checks 
this code against the output device 
code. If they differ, this message 
is output. 



^DOSSAV retries five times on a parity error before issuing 
an unrecoverable error message. 
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Operating Instructions (Cont'd ) 

BLK 1775 OCCUPIED. NO 2ND SAT CREATED 

A DECdisk system created for 4 or 
fewer platters is restored to a 
machine with 5 or more platters 
and block 1775 is already used. 
Therefore, no second SAT is 
created. A Master Tape was not 
used to make the restore. 

D. Tape Structure 

The restore tapes are structured as follows: The first SAT of 
the system is the first block put on the tape. This SAT, 
which is never restored to the disk, has 2 words modified: 
word 2 contains the creation date (taken from .SCOM+47) and 
word 376 contains the device mnemonic (.SIXBT, right justified) 
All the occupied blocks referenced by this SAT are then put _ 
sequentially on the tape. The second SAT, if there is one, is 
then put on, and so on. This structure enables use of Magtape, 
which is a sequential only device. 

E. DOSSAV Restrictions 

1. It is not possible to save or restore Magtapes with even 
parity. 

2. DOSSAV fails when two DECtapes are on line with the same 
unit number. It is necessary to restart under such 
circumstances . 



( 



3. Error checking and recovery is minimal. 
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DUMP V9A (EDIT 9009 ) 

Info2nnation on .DAT slot Assignments 
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The cominand string will be output onto whatever device is 
assigned to .DAT -12. 

If DAT -14 is assigned to any device other than DECtape, 
Disk Pack or DECdisk, DUMP will print the following message: 

.DAT -14 IS NOT ASSIGNED TO DISK OR DECTAPE 
and then DUMP will exit to the Nonresident Monitor. 

If .DAT -12 is assigned to a mass storage device, DUMP will 
not require an ALT MODE after an ALL command in order to 
create a file memory dump, called "MEMORYi-jDMP" . 

DUMP V9A will output only one form feed, instead of two, 
when the line printer is assigned to .DAT -12. 
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DUMP V9A (Edit #0(?9) 

Some Information on QAREA's 
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DUMP will check the device assigned to .DAT -14, in order 
to determine the first block of the QAREA. If DECtape, 
the first block is always lj2fll. If Disk Pack, the first 
block is always 117j2f3j2f. The QAREA on DECdisk will be in 
different positions (space allocated during system genera- 
tion) , depending on the contents of .SCOM+66. 

In the special case when the system device is Disk Pack, 
and .DAT -14 is assigned to a DECdisk, DUMP will print the 
following whenever the user attempts to dump the QAREA. 

TYPE 1ST BLOCK # OF QAREA 

In such a case, the user should type: 

NNNNN#<CR> or ALT MODE 

and then repeat the ALL command. This special case is 
made because .SCOM+66 contains Disk Pack information. 

If the user wishes to dump a QAREA that has a size different 
from the core size current to the system, he should type: 

>ALLi_i(nn) <CR> or ALT MODE 

where nn may be 8, 12, 16, 20, 24, 2 8 or 32 (The space 
after the ALL and the right parentheses are optional.) 



Note: 



( 



The first block number and size of the 
CTRL Q area can be determined by listing 
SYSBLK with PIP: 

L-^TT DK (L) 



Software Product 
DOS-15 


Ver< 

v: 


ion 
LA 


Component 

DUMP 


Version 
V9A 


Edit ' 
9 


Subprogram or Additional Information 


Sequence * 

2 


PAGE 
1 OF 1 


New Replacement Article 
X 


Original Dote 



< 



( 



( 



SOFTWARE DISRflOCH 


DOS-15 


PRE-1973 



DUMP V9B (EDIT #j?^9) 

Patch to correct problem with selective dumps 

PROBLEM: 

DUMP V9A outputs incorrect information on selective dumps, 

SOLUTION : 

Make the following binary corrections to DUMP using the 
PATCH program. 
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LOCATION 


OLD CONTENTS 


NEW CONTENTS 


NEW SYMBOLIC 


COMMENTS 


16256 


2174j2f6 


617472 


JMP PATCH 


/Patch area 


17472 


- 


116034 


JMS DEVICE 


/Device check 


17473 


- 


217406 


LAC (-1) 


/Restore inst 


17474 


- 


616257 


JMP BACK 


/Return 


17224 


1)36400 


206400 




/V9B 



c 
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DUMP V9C (EDIT #0j?9) 

Patch to correct looping problem 

PROBLEM: 

DUMP V9B gets into an endless loop on the command "TYPE 
1ST BLOCK OF f QAREA" . 

SOLUTION: 

Using PATCH, make the following binary corrections to DUMP. 
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LOCATION 


OLD CONTENTS 


NEW CONTENTS 


NEW SYMBOLIC 


16123 


615516 


617475 


JMP PATCH AREA 


17475 


- 


2174j?2 


LAC (NOP 


17476 


- 


)2(55735 


DAC CONTAL 


17477 


- 


615516 


JMP TR6 


17224 


2^64^^ 


3^64]? j3 


V9C 
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DUMP V9C (EDIT i09) 

DUMP described in DOS Keyboard Command Guide 



There is no utility manual for the DUMP utility program. 
This information is instead included as a Chapter in the 
DOS Keyboard Command Guide (DEC-15-NGKA-D) . 
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FNEW (EDIT #j?04) 

The Random Niomber Generator 
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The DOS version of FOCAL has a random niimber generator (FRND) 
included in FNEW (user-defined FOCAL functions). This 
routine is an improvement over the FRAN function in FOCAL. 

FRND generates real, floating point numbers in the range of 
-1.0 less than or equal N less than or equal +1.0. The 
function can be called in the following ways. 

FRNDO Generate a random number based 

upon the last number generated.^ 

FRND(^) Same as above. ^ 

FRND(X) Start a new sequence of random 

numbers based on the value of X. 
FRND will always generate the 
same number for the same value 
of X. X can be any valid arith- 
metic expression. 



( 



^If this is the first call for the generator, FRND initializes 
itself. Under the standard output format of FOCAL, this 
produces a value of 1.0000. 
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FORTRAN, Object Time FORMAT Specification 
Usage restriction and precaution 



PROBLEM: 

Section 6.1.3 of the FORTRAN IV Language Manual (DEC-15-GFWA-D) 
describes the usage of object time FORMAT specifications. It 
is not allowed, however, to use the name of an array that 
appears in a SUBROUTINE statement parameter list as an array 
name that is referenced by an I/O statement. That is, in 
the following program, the construction is correct. 



( 



DIMENSION IBUF(l0).FORM(ia) 
DATA FORM(l) /5H(4Ii0/ 
DATA FORM(25 /5H5 / 
00 1« I ■ 1»10 

IP leuFtn ■ 1 

N$Zb4 

WRITE (6, FORM) ( IBUF CI) » I M » NSZ) 

CALL PRINT (IBUF,NSZ,FORM) 

PAUSE 

END 

The first four elements of IBUF will be printed according 
to the format specified in the array FORM. If this is 
attempted in the subroutine PRINT, shown below, an OTS 
12 will occur. 

SUBROUTINE PRINT (IBUF ,N8Z »FORM) 
DIMENSION IBUFCn, FORM(10J 
WRITE (6,3) (FORM(l),I-l,l(!) 
3 FORMAT(IX,10A5) 

WRITE (8, FORM) (IBUF (I) , I»l , NSZ) 

RETURN 

END 
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Usage restriction and precaution (Cont'd ) 



RESTRICTION AND PRECAUTION: 

To avoid this problem, it would be necessary to create some 
array in PRINT and to copy FORM into it. The former array 
could then be specified in the WRITE statement. Actually, 
the difficulty described here should be flagged as an 
error when compiling. The restriction will be relieved in 
the next release of the compiler. 

As a further precaution, always enclose your FORMAT speci- 
fication in parentheses when using this technique. 

Note that this was done in the DATA statement of the main 
program above. 
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FORTRAN 



Usage of ADSS versus DOS Magtape handler MTF 



PROBLEM: 

1. The MTF. handler released with ADSS-15 V5A does not 
calculate checksums for lOPS binary records. MTF. 
006 released with DOS does calculate checksums. Users 
attempting to read old data tapes under DOS FORTRAN 
may run into problems. 

2. MTF. 006 has a default buffer size of 255 (10). The 
ADSS version has a fixed buffer size of 56 (10) . 

3. The buffer size in MTF. 006 may be changed under 
program control by referencing the global "MTBSIZ". 

(See DOS Users Manual) . 

4. MTF. 006 checks for record length errors prior to cal- 
culating checksums, and, if the record length is less 
than 255 (i.e., 56), MTF. 006 returns to the user with- 
out calculating a checksum. 

The above inconsistencies create the following possi- 
bilities when reading old data tapes under DOS FORTRAN 
and MTF. 006. 

MTBSIZ OTS Data 

Error Read In 



One physical record 


^^^10 


None 


Good 


per logical record 


5^10 


11 





More than one 


255 


None 


Bad 


physical record 
per logical record 


56 


11 


.__ 
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Usage of ADSS versus DOS Magtape handler MTF (Cont'd) 

In order to avoid OTS or data errors when reading old tapes 
under DOS FORTRAN/MTF. 006, the user must follow this 
procedure: 

1. Call loader with $LOAD (not GLOAD) 

2. Load program using P option to get core map 

3. When loader types fS, depress stop button 

4. Deposit 10000 in MTF. + 423 (8) where MTF. = 
load map address for MTF. 

5. Deposit 000010 in MTF. + 1201 (8) 

6. Press continue and type iS to start program 

Another alternative would be to change the source of MTF. 
006 so that it never calculates checksums and then under 
prograiri control change the contents of "MTBSIZ" with a 
GLOBAL subroutine. 

As a final possibility, the user may copy his old data 
tapes using the following program. 

10 CALL SETS 6 

READ (1, END = 11) LIST 
CALL SET255 
WRITE (2) LIST 
GO TO 10 

11 CALL SET255 
WRITE (2) LIST 
CALL CLOSE (1) 
CALL CLOSE (2) 
STOP 

END 
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SET56 and SET255 are two macro subroutines; 
.GLOBL SET56,MTBSIZ, .FM 



SETS 6 



SET255 





LAC (70) 

DAC* MTBSIZ 

DAC* .FM 

JMP* SET56 
• END 

.GLOBL SET255, MTBSIZ, .FM 



LAC (377) 

DAC* MTBSIZ 

DAC* . FM 

JMP* SET255 

.END 



* Do not modify these programs. 

Insure that tapes are at load point before starting, 
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FORTRAN IV OPERATING ENVIRONMENT MANUAL (DEC-15-GFZA-D ) 

Corrected version of ADJ to remove incompatibility with 
FORTRAN Object Time System 

PROBLEM: 

The ADJ subroutine published in DEC-15-GFZA-D, 'FORTRAN IV 
Operating Environment', Appendix C, is not compatible with 
FORTRAN OTS libraries using .SS 00S, { . SS 008 is edit #8 
of .SS, the array element address calculation routine) . 

Errors will occur for the following case 

1. A calling program DIMENSIONS a single subscripted array, 
e.g., A{100) . This array is passed as a subroutine call 
parameter, e.g., CALL Z (A). 

2. The subroutine adjusts this array to be used as a two 
dimensional array, e.g. 

SUBROUTINE Z (A) 

DIMENSION A(10,lj2f) 

CALL ADJ (A,A{1,1) ,10,10,0) 

What happens is that .SS 008 is used to calculate the address 
of A(l,l). This causes a fatal error, since .SS 008 is being 
used on an array (A (100) in the main program) that is still 
single dimensioned until the ADJ call is complete. .SS 008 
is not usable for single dimensioned arrays, and will not 
make a proper return. 

SOLUTION: 

The following changed ADJ circumvents this problem by re- 
entering the latter parts of .SS 008 at such a location 
that the address computed is returned directly to ADJ. This 
change is compatible only with . SS 008 as assembled without 
any conditional parameters. The changed version replaces 
the published version in the aforementioned document. 
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Corrected version of ADJ to remove incompatibility with 
FORTRAN Object Time System (Cont'd ) 

It should be kept in mind that once an array is adjusted 
in a program this constitutes a change on the array's 
array descriptor block which remains in effect until another 
ADJ call is made. Thus, for an array that is adjusted in 
some program, the adjusted values pertain on return to a 
calling program from which the array name is passed, or in 
any called program to which the array name is passed. 



/ ADJ - FORTRAN ARRAY DESCRIPTOR BLOCK DIMENSION ADJUSTMENT 

/ 

/ EDIT #1 (TAM) 

/COMPATIBLE ONLY WITH UNCONDITIONALIZED VERSION OF .SS j2fJ2f8 

/COPYRIGHT 1973, DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. 

/ 

/CALLING SEQUENCE 

/ 
/ 
/ 



/ 

/ 
/ 
/ 
/ 

ADJ 



ARRAY 

B 

Kl 

K2 

K3 



JMS* ADJ 
JMP .+6 
.DSA ADBWD4 

.DSA B 

.DSA Kl 
.DSA K2 
.DSA K3 



( 



/ADDRESS OF WD4 OF ARRAY DESCRIPTOR BLOCK 
/OF ARRAY PASSED AS A DUMMY PARAMETER 
/ADDRESS OF LOCATION IN THE ABOVE ARRAY AT 
/WHICH THE ADJUSTED ARRAY IS TO BEGIN 
/ADDRESS OF NEW MAXIMUM FIRST SUBSCRIPT 
/ADDRESS OF NEW MAXIMUM SECOND SUBSCRIPT 
/ADDRESS OF NEW MAXIMUM THIRD SUBSCRIPT 



. GLOBL ADJ , . DA , . AD , . SS 

JMS* .DA /GET ARGUMENT ADDRESS 

JMP .+6 /JUMP AROUND PARAMETER LIST 
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Corrected version of ADJ to remove incompatibility with 
FORTRAN Object Time System (Cont'd ) 



F 
/ 



( 



LOOP 
C 



LAC* K2 
SNA 

JMP F+1 
LAC .SS 
TAD (34 
DAC B 
LAC (F 
DAC* .SS 
JMP* B 
DAC B 

LAC (LAC* B 
DAC C 
LAC B 

DAC* ARRAY 
LAW -3 
DAC CTR# 
TAD ARRAY 
DAC ARRAY 
DAC ARRAYP# 
LAC* ARRAY 
AND {60000 
DAC* ARRAY 
LRSS 15 
TAD (1 
AND (3 
SNA 
LAC (2 
ISZ C 
JMS* .AD 
XX 
SNA 
JMP D 
DAC SIZE# 
ISZ CTR 
SKP 
JMP E 



/SPECIAL CONSIDERATION IS MADE FOR CASE OF 
/ADJUSTING A SINGLE DIMENSIONED ARRAY TO 2 OR 
/MORE , SINCE .SS 008 WILL THEN FAIL IN COMPUTING 
/B. IF K2 IS ZERO, WE'RE OK, AS THEPK IS ONLY 
/ONE DIMENSION TO ADJUST. ELSE THE LAST PART OF 
/.SS IS REDONE. B IS USED TEMPORARILY TO STORE 
/ADDRESS AT WHICH TO ENTER .SS. AND F IS SET 
/AS THE ADDRESS .SS WILL RETURN TO. 
/THUS THIS JMP* IS TO .SS+34. RETURNED IN THE 
/AC IS THE CORRECT ADDRESS OF THE NEW LOCATION. 

/INITIALIZE SUBSCRIPT POINTERS 

/SET NEW STARTING ADDRESS 

/COUNT FOR 3 SUBSCRIPTS 

/COMPUTE ADDRESS TO FIRST WORD OF ARRAY DESCRIPTOR 

/BLOCK IN THE PROGRAM IN WHICH THE ARRAY IS 

/DEFINED. THE ARRAY TYPE IS IN BITS 3 & 4 OF THIS 

/WORD. 

/ZERO OUT THE ARRAY SIZE 

/SAVE CLEAN ARRAY TYPE 

/RIGHT JUSTIFY THE MODE, AND DETERMINE LENGTH 

/OF THE VARIABLE TYPE. LENGTH = MODE + 1, EXCEPT 

/FOR DOUBLE INTEGER 



/BUMPS TO LAC* Kl, THEN K2 , THEN K3 

/MULTIPLY INTEGERS - CURRENT AC CONTENTS TIMES 

/Kl, K2, OR K3, WHERE LAC* B WAS DAC'D, THEN 

/ISZ'D ABOVE. WHEN THE RESULT IS ZERO, HAVE 

/RUN OUT OF SUBSCRIPTS. 

/UPDATE CUMULATIVE SIZE. 

/ARE 3 SUBSCRIPTS YET TREATED? 

/NO - GO STORE SUCCESSIVE SIZES 

/YES - GO CLEANUP 



Software Product 

nn.q-iR 


Version 
V2A 


Component 
FORTRAN 


Version 
N/A 


Edit " 
1 


Subprogrom or Additional Information 
ADJ 


Sequence * 

3 


PAGE 
3 OF 4 


New Replacement Article 
X 


Original Dote 



SOFTWARE DISRMCH 


DOS-15 


MARCH 1973 



Corrected version of ADJ to remove incompatibility with 
FORTRAN Object Time System (Cont'd) 



/ 



/ 
D 



/ 

E 



ISZ ARRAYP 
DAC* ARRAYP 
JMP LOOP 

DZM* ARRAYP 
ISZ ARRAYP 
ISZ CTR 
JMP LOOP 

LAC SIZE 
AND (17777 
XOR* ARRAY 
DAC* ARRAY 
•JMP* ADJ 
.END 



/STORE SUCCESSIVE SIZES INTO APPROPRIATE WORDS OF 
/ARRAY DESCRIPTOR BLOCK 

/WHEN HAVE RUN OUT OF SUBSCRIPTS, ZERO THE 
/REMAINING WORDS OF THE ADB. 
/CHECK FOR FINISH 



/CLEANUP - PACK THE SIZE AND THE MODE BITS INTO 
/THE FIRST WORD OF THE ADB. 
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FORTRAN COMPILER (EDIT #36) F4X V36B, FPF4X V36B AND F4X9 V36B 
Patch to correct improper imbedded subscript calculation 



PROBLEM: 

F4 036 generates improper subscript calculating code for 
A(J(I)) with a non-integer array. 

SOLUTION: 

The following patches, one for each of the three compilers, 
correct this problem. Use the "LR" command when patching 
FORTRAN or any relocatable file. 
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F4X 



LOCATION 


OLD CONTENTS 


NEW CONTENTS 


SYMBOLIC 


6546 


106400 


206400 


•V36B' 15 


7736 


207724 


#+615435 


JMP PATCH 


7737 


112754 


#+210231 


LAC TSI 


7740 


113247 


#+055443 


DAC TSITMP 


7741 


040007 


#+215443 


LAC TSITMP 


7742 


110100 


#+050231 


DAC TSI 


7747 


607743 


#+607741 


JMP .-6 


15435 





#+207724 


LAC EXSBMD 


15436 





#+112754 


JMS SETN 


15437 





#+113247 


JMS TWOCMA 


15440 





#+040007 


DAC SSCTR 


15441 





#+110100 


JMS FPPOUT 


15442 





#+607737 


JMP BACK 


15443 








— 



( 



Software Product 
DOS-15 


Version 
V2A 


Component 
FORTPAN rnMPTT.F.R 


Version 

V36B 


Edit * 

36 


Subprogram or Additional Information 
F4X, FPF4X, F4X9 


Sequence * 

1 


PAGE 
1 OF 2 


New Replacement Article 

u 


Original Date 



SOFTWARE DISBMCH 


DOS-15 


August, 1972 



FPF4X 



F4X9 



fat.cn X.O CO] 
LOCATION 


OLD CONTENTS 


NEW CONTENTS 


SYMBOLIC 


6607 


333202 


333204 


'V36B' 15 


10004 


207772 


#+615714 


JMP PATCH 


10005 


113072 


#+210344 


LAC TSI 


10006 


113365 


#+055722 


DAC TSITMP 


10007 


040007 


#+215722 


LAC TSITMP 


10010 


110213 


#+050344 


DAC TSI 


10015 


610011 


#+610007 


JMP .-6 


15714 





#+207772 


LAC EXSBMD 


15715 





#+113072 


JMS SETN 


15716 





#+113365 


JMS TWOCMA 


15717 





#+040007 


DAC SSCTR 


15720 





#+110213 


JMS FPPOUT 


15721 





#+610005 


JMP BACK 


15722 










6533 


640432 


641032 


'V36B' 15 


7716 


207704 


#+615412 


JMP PATCH 


7717 


112742 


#+210211 


LAC TSI 


7720 


113235 


#+055420 


DAC TSITMP 


7721 


040007 


#+215420 


LAC TSITMP 


7722 


110060 


#+050211 


DAC TSI 


7727 


607723 


#+607721 


JMP .-6 


15412 





#+207704 


LAC EXSBMD 


15413 





#+112742 


JMS SETN 


15414 





#+113235 


JMS TWOCMA 


15415 





#+040007 


DAC SSCTR 


15416 





#+110060 


JMS FPPOUT 


15417 





#+607717 


JMP BACK 


15420 
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FORTRAN COMPILER (EDIT #36) F4X V36B, F4X9 V36B, FPF4X V36B 
Errors not detected during compilation 



( 



PROBLEM: 

The following errors have been found to occur during compila- 
tion using either the F4X V36B, F4X9 V36B, or FPF4X V36B 
compiler. These will be corrected in subsequent releases 
of the compiler. 

1. Unbalanced parentheses in subroutine calls of the form 

CALL LINE ((-MX (I) ,0,1) 

are not trapped as an error, and bad object code is 
generated. 

2. IMPLICIT mode declarations of variables appearing in a 
Statement Function definition fails, i.e., these variables 
will assume default mode. 

SOLUTION: 

1. Solution not yet available. 

2« To cure problem 2, use an explicit mode declaration 
for these variables. 
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FORTRAN COMPILER (EDIT #36) F4X V36B, FPF4X V36B, F4X9 V36B 

Programming to avoid incorrect mode typing of Functions 
declared EXTERNAL 



PROBLEM: 

The compiler is presently typing as Integer any Function 
named in an External statement. This has bad effects only 
in the case where a call to such a Function is generated in 
the same program in which it is declared External,- and where 
the Function should not normally generate an Integer result. 
No correction is published presently, although a rectification 
to this will be included in the next compiler release. 

RESTRICTION: 



( 



For now, restrict your use of the External statement to 
naming Functions that are used only as Subroutine or other 
Function parameters ; despite the fact that they are thought 
to be Integer by the main program, the correct address of 
the Function will be passed. However, if a Function is 
invoked in some program, do not declare it in an EXTERNAL 
statement in this same program. The Function will then 
retain its External characteristic (a fact that is deter- 
mined by the compiler by the context in which it is used) , 
will not lose its mode, and can be passed as a Subroutine 
parameter. 
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FORTRAN COMPILER (EDIT #36) F4X V36B, FPF4X V36B, F4X9 V36B 
Incomplete DO Statement difficulties 

PROBLEM: 

Statements of the form 
DO 20 I = 1 

plete, are not flagged by the compiler properly. When the 
total number of non-blank characters between column 7 and 
the equal sign does not exceed 6, no error is noted. The 
compiler, in fact, codes the assignment statement D02j2fl=l, 
due to its eliminating of all blanks before processing 
statements. 

It also occurs that when the total number of non-blank 
characters between column 7 and the equal sign exceeds 6 , 
the error indicating a string of more than six characters 
occurs. For example, the compiler tries to interpret 

DO 2000 1=1 

as D02j2fi2(j2fl = 1, which is an invalid assignment statement. 
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FORTRAN OTS 



Programming note to eliminate carriage return 



There is a FORTRAN level trick to eliminate the carriage 

line with an integer (using Al format) which is initialized 
with an altmode (in 7 bit ASCII) . If a READ is desired at 
the end of the line, it must be through a .DAT slot differ- 
ing from that on which the WRITE was issued (which avoids 
a re-init by FIOPS) . Also, the read .DAT slot must have 
been previously INITed (done for example a REWIND) . 

Example: 



( 



400 



DATA IALT/#76 4000/ 

REWIND 3 

WRITE (4,400) lALT 

FORMAT (IX, "NUMBER PLEASE; 

READ (3,) N 



Al) 



END 

response 
This results in a FOCAL type read, viz, ENTER NUMBER PLEASE: 
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FORTRAN OTS ROUTINE ,DA (EDIT #{?11 ) 
Programming note 



Because of the multiple entry feature in F4X, the argument 
address fetch subroutine .DA does double ended double in- 
direction when fetching and storing addresses passed from 
a main program to a subroutine. Users should be aware that 
if bit zero in the storage address cell of the subroutine is 
set, another level of indirection is performed. Thus, MACRO 
subroutines using the argument address cells as scratch cells 
may suddenly cease to function under F4X. 
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FORTRAN OTS ROUTINES AMOD AND DMOD 



Numerical Restrictions 



( 



In the exis 

accommodate 
AMOD (ARGl, 
puting the 
result to a 
tion limits 
217, i.e. , 
met, an OTS 
the results 



ting FORTRAN documentation there is not stated 
on the range of values that AMOD and DMOD can 

In either of these, for a call of the form 
ARG2) , one of the internal operations is corn- 
result of ARG1/ARG2, and then converting this 
single precision integer. This latter opera- 
the useful range of ARG1/ARG2 to less than 
less than 131072. VThen this condition is not 
11 error occurs, the program continues, and 
of AMOD or DMOD are not generally predictable. 



This restriction can be relieved somewhat by the following 
example. (The following is not to be construed to be a 
supported software feature of the FORTRAN Object time system) . 
Considering the case of DMOD, code and compile: 

DOUBLE PRECISION FUNCTION DMOD (ARG1,ARG2) 

DOUBLE PRECISION ARG1,ARG2, D 

DOUBLE INTEGER J 

J = ARG1/ARG2 

D = J 

DMOD = ARGl - D*ARG2 

RETURN 

END 



Explicitly state this program's file name in the loader com- 
mand string, and it will be loaded instead of the FORTRAN 
Library routine DMOD. It extends the largest useful value 
of ARG1/ARG2 to be less than 34,359,738,368. 

An equivalent routine may be written to replace AMOD, by 
replacing "DOUBLE PRECISION" with "REAL" and "DMOD" with 
"AMOD", at all locations in which each appears. 
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FORTRAN OTS ROUTINE DDIO (Edit #14) , FPP VERSION 
Reading INTEGER variables causing lOPS 
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PROBLEM: 

The following error has been found to occur during the 
execution of FORTRAN compiled programs using the FPF4B V36B 
compiler. Corrections will appear in subsequent releases 
of this compiler. 

1. Reading in INTEGER variables (not arrays) using DDIO, 
Edit #14 may cause an lOPS 0, although it cannot in 
general be predicted when this situation will arise. 
To avoid the problem, read the element into a DOUBLE 
INTEGER variable, then convert it to an INTEGER by 
an assignment statement or use of the ISNGL function. 
This problem could conceivably show up when using 
non-FPP versions, but has not been found to occur in 
test situations. 
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LPA.15 (Edit #044) 

Source Change to Prevent Return to Mainstream, at API Level 
4 on .WAIT 



PROBLEM: 

The current LPA.15 handler does not do a DBR on return from 
a successful .WAIT system MACRO. Therefore, the calling 
program is entered at API level 4. 

SOLUTION: 

The problem is corrected by editing the source (LPA.15 Edit 
#043) as indicated below. 



Location 



Old Contents 



New Contents 
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LPWATl+1 



JMP* LPARGP 



JMP LPNEXT 
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LINKING LOADER V12A (Edit #i?23) 
Features of this Version 
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The Linking Loader will load programs in whatever addressing 

^_ j_ X. a.— o-U— '-'\'C'>-£im mViffl DAMV an/^ DaCT? Ktonr'eside''^ t 

Monitor coininands set the addressing mode. This loader 
identifies itself as LOADER V12A for page mode loads, and 
BLOADER V12A for bank mode loads. 

There is a new Linking Loader code, CODE=33, which indicates 
the extension of the source file used to create the binary 
file via MACRO-15. When the "P" switch is used with the 
Linking Loader, the loader will print both the Object File's 
name, and the Source file's extension, for each file loaded. 
This allows programmers to identify different versions of 
their binary files. 

The loader has been modified to allow arbitrary numbers of 
positive .DAT slots (as determined at system generation, 
up to 77 octal), and it will compute the position of .DAT 
from .SCOM+23. 

The Linking Loader searches the 'IDS' UIC, the user's library, 
if one is present, and the system library as many times as is 
necessary to resolve .GLOBL's.^ If a complete pass through 
them yields no new resolution, the Loader tries to match the 
missing .GLOBL's to Common Blocks. If some missing .GLOBL's 
still remain, a LOAD 3 is generated. These searches terminate 
early, if all .GLOBL's are resolved. The effect of this change 
is to allow backward references in user libraries, and to allow 
user files to reference the lOS and the system library. 



^ lOS, User Library, System Library, 
(Test for resolution on last pass) 
User Library, System Library, lOS; 
(Test) etc. 



lOS; 
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LKA. (EDIT 000} 
Functional Description 
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1. Overall Description 

The LK35 Keyboard Device Handler provides an interface 
between the user and the hardware. In general, it conforms 
to the conventions of the Disk Operating System, as des- 
cribed in DEC manual, DOS-15 User's Manual, DEC-15-0DUMA-A-D. 
Since the LK35 keyboard is a send only device, this handler 
will only handle input functions. The input functions are 
initiated by standard user program commands and all interrupt 
management is done automatically by the handler. The handler 
does not make the LK35 a console control keyboard; it is only 
an input device. 

The primary goals of the handler are to relieve the user from 
writing his own device-handling siibprograms and to centralize 
all direct communication between the PDP-15 and the LK35 
keyboard. This handler will only input lOPS ASCII or IMAGE 
ASCII into a user's designated buffer. It is up to the user 
to display the text on the VT04, or write the text on any 
other device. The LK35 will be connected to the LT15 or the 
LT19D. Only one LK35 under DOS is supported. 



Equipment required includes a PDP-15/20 with a 



VT15 

VTj2f4 or VTj2(7 

LK35 

LT19D or LT15 
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Functional Description (Cont'd ) 



Legal System 


Macros 


Ille 


gal Functions 


Ignored Functions 


.INIT 






.WRITE 


.SEEK 


.READ 






. DLETE 




.WAIT 






.RENAM 




.WAITR 






. ENTER 




.CLOSE 






. CLEAR 




.FSTAT 






. MTAPE 
.TRAN 




2 . Legal Functions 








2.1 .INIT (initialize) 


Macro 





The .INIT causes the keyboard to be initialized and must 
be called before any other I/O Macro to this device is 
issued. 

a. Form . INITu[-]ds,dd,restrt 

b. Variables 

ds = .DAT slot number 

dd = ignored - may be any number between J? and 3 

restrt = CTRL P address 

c. Expansion 

L0C+j2f CAL+li2(j2(J2f*dduj[-]ds&777 
LOC+1 1 
LOC+2 restrt 

LOC+3 0^110000 /standard size of buffer (34^^) will be 
/returned 

d. Description 

1. Handler will return standard line buff er size (34^-) 

2. .INIT will abort a .READ 
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Functional Description (Cont'd) 
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2.2 .READ Macro 

The .READ macro is used to transfer data from the LK35 to 
core memory. 

a. Form . READ i_i[-] ds ,m,buf add, wc 

b. Variables 

ds = .DAT slot number 
m = Data mode 

2 = lOPS ASCII 

3 = IMAGE ASCII 
bufadd = Line buffer address 

wc = Line buffer word count, including the two-word 
header. 

c. Expansion 

L0C+j2f CAL+lJ2fJ2fJ2f*m,_,[-]ds&777 

LOC+1 10 

LOC+2 bufadd 

LOC+3 -wc 



Description: sREAD will 



1. Allow previous input to terminate. 

2. Set input underway indicator. 

3. Set up to accept characters from keyboard. 

4. Accept data control characters in lOPS ASCII. 

a) Rubout - delete previous character typed. 

b) tu - delete entire line typed so far. 

5. Carriage Return or ALT MODE terminates an 
lOPS ASCII read. 

6. The word count terminates an IMAGE ASCII read. 
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Functional Description (Cont'd) 

2.3 .WAIT Macro 

The .WAIT macro is used to detect the availability of the 
user's line buffer. 

a. Form . WAIT ,_,[-] ds 

b. Variable 

ds = .DAT slot number 



c. Expansion 

LOC+^ CALu_,[-]ds&777 
LOC+1 12 

d. Description 

1. Control is returned to the user immediately after 
the expansion, if the line buffer is available. 

2. If transfer of data has not been completed, control 
loops on the .WAIT macro. 

2 .4 .WAITR Macro 

The .WAITR macro allows the user program to proceed in line 
if the previous .READ is complete. If the previous .READ is 
not complete control is given to the location in the user 
program specified by the .WAITR call. This allows the user 
to branch to some other part of his program while waiting for 
the .READ to finish. The user must continue to check for 
completion by periodically issuing .WAITR' s or by using a 
.WAIT. 



( 



a. 



Form .WAITRi_,[-]ds,waitad 



b. 


Variables 

ds = .DAT slot number 
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Functional Description (Cont'd ) 

waitad = location in the user program to branch to 
if input is not completed. 

L0C+i2f CAL+1^0j2fL_j[-]ds&777 
LOC+1 12 
LOC+2 waitad 

2.5 .CLOSE Macro 

a. Form . CLOSE j_j[-]ds 

b. Variables 

ds = .DAT slot number 

c. Expansion 

L0C+i3 CALi_,[-]ds&777 
LOC+1 6 

d. Description 
Same as .WAIT 

2.6 .FSTAT Macro 

a. Form .FSTATi_i[-]ds, address 

b. Variables 

ds = .DAT slot number 
address = ignored 



Software Product 

DOS-15 


Version 
V2A 


Cor-iponent 
LK35 KEYROARn HANDT.F.R 


Version 
N/A 


Edit # 



Subprogram or Additional Information 
LKA. 


Sequence * 

1 


PAGE 

5 OF 6 


New Replacement Article 


Original Date 



SOFTWARE DISRMCH 



DOS-15 



PRE-1973 



Functional Description (Cont'd ) 



c. Expansion 

LOC+0 CAL+30jaf)2ft_,[-]ds&777 
LOC+1 2 
LOC+2 address 

d. Description 

1. Will return a zero in the AC, since this since 
this device is non-file oriented. 

3. Legal Control Characters 

a. Control C (+0 does a .EXIT to the Monitor. 

b. Control P (tp) transfers control to the address 
given in the .INIT CAL. 

c. Control D (I'D) gives an End-of Medium Header Word 
Pair to the user. 
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New Switches in this Version 
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The Omit (0) switch 

The switch will cause MACRO-15 to omit the source extension 
and the new Linking Loader code (code=33) from the binary file. 
This should be used when assembling programs to be run on 
other PDP-15 systems, in particular, BACKGROUND/FOREGROUND, 
and ADVANCED SOFTWARE SYSTEM. 

The Error (E) switch 

The E switch allows programmers to have any assembly errors 
printed on the console teleprinter, in addition to the device 
assigned to .DAT-12. The E switch is useful only if the L or 
N switches are also used. 

This will help prograimners who assign DECtape or Disk to 
.DAT-12, but want to know where any error lines are. Previously, 
such a situation would require two assemblies: One to find any 
errors (e.g. r-'-FILj, that is, no switches), and one other if no 
errors occurred, this time using the N or L switches. 

The Table of Contents (T) switch 

If "T" is typed in the command string, a table will be generated 
during Pass one with the page number and the text of all assem- 
bled .TITLE statements in the program. This file will be gen- 
erated with the program listing name on .DAT-12. Note that it 
is still necessary to type N, L, etc. if other listing output 
is required. 

An assumption about switches: 

If the L and X options are typed, MACRO-15 will assume that the 
N-option was typed also. This will help the user who typically 
forgets to type "N" and gets a cross reference that is effec- 
tively useless, because the source lines of the listing are not 
numbered. 
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MACRQ-15 V7A (EDIT #)2f82) 

Macros Implemented Specifically for DOS-15 



MACRO- 15 for DOS implements .RAND, .RTRAN, .USER, .OVRLA, 
.GTBUF and .GVBUF, as per Appendix B-1 and B-2 of the DOS 
PRELIMINARY MANUAL (DEC-15-MZDA-D) . MACRO accepts .ENTER 
macros with file protect codes. MACRO-15 has not imple- 
mented Macro calls for .GET and .PUT. 
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MACkO-15 V7A (EDiT #082) 
Pseudo-op y .CBD 
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The Macro Assembler pseudo-op .CBD (Common Block Definition) 
allows the assembly language programmer to declare a COMMON 
of an indicated name and size, and to specify a word to be 
set to its base address. 

The .CBD pseudo-op takes a COMMON name and its size as 
arguments, reserves one word of core, and outputs loader 
codes and parameters to direct the Linking Loader or CHAIN 
to set a vector to the first element of the indicated COMMON 
in the reserved word. For example, the statement 

BASE .CBD ABCD 6 

will provide the base address of COMMON/ABCD/ in the word 
labelled BASE. 

Attached is a sample subroutine and an expansion of its 
assembled output. The 07, 10, 14, 15, 16 (octal) loader 
code sequence is the result of the .CBD pseudo-op. The 
01-10-14 codes declare a COMMON named ABCD, and the 15-16 
codes indicate that a vector to location 0000 in the COMMON 
is to be set in location )2fj3fl2 of the routine being relocated. 

NOTE: The .CBD pseudo-op must not be the first line of code. 
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Pseudo-op. .CDB (ContM ) 



PAGF 



SIGMA SPC 



000PI0 
0C1001 
00002 
00003 
00004 

00005 
00006 
00007 

00010 
00011 



000000 
200013 
722000 
735000 
750000 

370012 
725001 
600005 

070012 
620000 



r^ TO 



00012 R 000000 A 



00013 T 
SIZE=00014 



000000 
000005 
NO 



/SIGMA 
/ 

/ 

SIGMA 



/ 

LOOP 



— FORTRAN CALLABLE SUBROUTINE 
.GLOPL SIGMA 



/ 

BASE 
/ 



A 

A *L 
ERROR LINES 





LAC 

PAL 

CLX 

CLA 

TAD* 
AXS 

J MP 

DAC* 

J MP* 



<5) 



BASE,X 
+ 1 
LOOP 

BASE,X 
SIGMA 



.CBD ABCD 6 
.END 



( 



/BASE OF COMMON BLOCK " 
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-op, .CDB 


(Cont'd) 






NA!«1E = 


SIGMA 






BIAS = 










01 


000014 








07 


474057 




SI 6 




10 


050550 




MA@ 




12 


000000 




SIGMA® 


=00000 


07 


A1A057 




SIG 




10 


050550 




MA® 
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074623 




SRC 
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=00000 


02 


000000 
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000000 


00000 


CAL 


00000 


03 


200013 


00001 
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00013 


04 


722000 
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lOT 


02000 


04 


735000 
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lOT 


15000 


04 


750000 
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OPR 


10000 


03 


370012 


00005 


TAD* 
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04 


725001 
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lOT 


05001 


03 


600005 


00007 


J MP 


00005 


03 


070012 


00010 


DAC* 


10012 


03 


620000 


00011 


JMP* 


00000 


07 


403223 




ABC 




10 


014400 




D®® 




14 


000006 








15 


000000 








16 


000012 








04 


000000 


00012 


CAL 


0000P! 


7,7. 


000013 








PI4 


000005 


00013 


CAL 


00005 


? 07 


406273 




PAS 




10 


017500 




jr^(a 




23 


000012 




nAFF(J5)P 


=00012 


07 


446547 




Lon 




10 


062000 




P(^0 




23 


000005 




Lnop^^ 


r0P10P)5 


07 


474057 




FIG 




10 


r50550 




MA@ 




7S 


000000 




riGMAO 


=00000 


27 


0000P0 




.END 


0000 
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MACRO- 15 V7A (EDIT #082) 

Note on Binary Output File Extensions 



( 



MACRO-15 will include the extension of the source file in 
the binary output file. This means that prograitmers inay 
use a numeric source file extension and increment it with 
each edit. (Other extensions are also legal, of course.) 
Then the P switch in the Linking Loader will produce the 
edit number of the current core load — an invaluable 
identification tool in development programming. UPDATE 's 
L command will also list the extension of the source file 
for each program in a library. 

MACRO-15 accomplishes this by using a new Linking Loader 
code, code=33, as shown in the example on the next page. 

Other PDP-15 systems, in particular, the ADVANCED SOFT- 
WARE SYSTEM and BACKGROUND/FOREGROUND, will not work with 
the 33 Loader code. If programmers wish to assemble source 
files for such systems with this version of MACRO-15, they 
should use the "0" (omit) switch, which will omit the 
source file extension and the 33 Linking Loader code from 
the binary file. 
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Note on Binary Output File Extensions (Cont'd ) 



EXAMPLE: 

PROGRAM LISTING 

PAGE 1 



J.BOND 007 



00000 R 200001 R 

00001 R 7i^.0000 A 

000000 A 



SIZE=00002 



NO ERROR /LINES 



DIRECTORY LISTIKG 
>L TT-t-DK 

28-SEP-71 
DIRECTORY LISTING 
767 FREE BLKS 

1 USER FILES 
110 SYSTEM BLKS 
J.BOND BIN 1 



/SHOW NEW LINK LOADER CODE 
/AND WHERE IT IS PLACED 

/ 

/EDIT* 007 9-28-71 

/ 

LAC A 
A NOP 

.END 
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Note on Binary Output File Extensions (Cont'd) 



BINARY PILE DUMP 



WORD CONTENT 



( 




1 
2 

h 
5 
6 

7 

1J8 
11 

12 

13 



010710 
000002 
4i4-13i].2 

332302 
226067 
I4.00000 
000000 

030ij.07 
200001 

714.0000 
003100 



3 LINK LOADER CODES (SIX BITS EACH) 

PROGRAM SIZE 

J.B = FIRST SIX CHARACTERS OP 

3 LINK LOADER CODES 
EXTENSION NAME IN RADIX 50 



FIRST INSTRUCTION 
SECOND INSTRUCTION 



(REST OP GENERATED CODE NOT SHOV/N) 
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MACRO-15 V7A (Edit #^82) 
Problems corrected 



( 



C 



The following MACRO-15 problems that existed in the Advanced 

Cr>-P+-Ta7-^ -v^ C?Trr«4-rtTr« Trr* v e? "l /^r% V»aTT£S ■Koom /^r^T'T'O r«4- oH • 

1. CAL's were incorrectly treated under the following circum- 
stances: 

In page mode, when a programmer wrote a CAL combined with 
an operator (e.g., CAL+1W0 ADDRES) 

The leftmost six bits were stripped off, so that ChL+00000 
ADDRES was produced. 

2. The .LST and .NOLST pseudo-ops did not work correctly 
where .NOLST occurred without being followed by a .LST 
before the end of the program. It would put the pro- 
gram in the .NOLST state at the beginning of the second 
pass. 

3. Forward references in literals caused literal phase 
errors during pass two. 

4. The .LOCAL and .NDLOC pseudo-ops caused a symbol to be 
lost whenever a break in alphabetic order occured in a 
list of tags. 

e.g.: XXX=1 

YY=2 
Z=3 
Xl=4j2(J?i? 

The XI would clobber the YY symbol when stored in the 
user's symbol tcible. 

5. If the F and X switches were used together, the wrong 
file name was passed to CREF by MACRO in pass three. This 
resulted in a fatal lOPS 13 message during Pass three. 



Software Product 
DOS-15 


Version 
VIA 


Component 

MACRO-15 


Version 
V7A 


Edit " 

82 


Subprogram or Additional Information 


Sequence * 

5 


PAGE 
1 OF 2 


New Replacement Article 
1 X 


Original Dote 



SOFTWARE DISRMCH 



DOS-15 



PRE-1973 



( 



Problems corrected (Cont'd) 



6. MACRO-15 lost some literals during PASS one in a 28K 
environment. This caused internal pointers to be out 
of phase. When these pointers were passed on to CREF 
(Pass three), CREF would wipe out part of lower core. 

7. The .EBREL and .DBREL pseudo-op now change addressing 
modes in .ABS(P) and .FULL(P) programs. 

8. The following sequence assembled correctly, but caused 
E errors. The error message is no longer produced. 

e.g. , 

.LOC 600^0 

LAW -1 

.LOC 70000 

LAW -1 
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MACRO-15 VTA (EDIT #jZf82) 

Progranmting Note on Usage of 'T' Switch 

PROBLEM: 

When using the T-switch, a discrepancy in the page count 
may occur where the user has a .LTORG in his program with 
many forward referencing literals. The forward referencing 
literals waste space, and should be removed — one location 
is reserved per forward reference. The page count discre- 
pancy occurs because the page count is adjusted during pass 
one to reflect the total literal count. If the count is 
smaller after pass two (forward references have been defined) , 
the page count is likely to be inaccurate. 
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MACRO-15 V7B (EDIT #082) 

Patch to Expand .RTRAN Correctly 



PROBLEM: 

MACRO-15 V7A expands the .RTRAN system macro with a positive 
rather than negative word count. 

SOLUTION: 

The following patch to MACRO corrects this error. The source 
code notation to the right need not be keyed in; it is shown 
only for information purposes. 



LOCATION 



OLD CONTENTS 



NEW CONTENTS 



SYMBOLIC 



( 



3272 
3273 
3274 
3275 



426|2f61 
504402 
024337 
700000 



426061 .ASCII /EC/<15> 

504532 <11>/-/ 

004121 .ASCII <001><005> 

577400 <15><177> 



7461 



106400 



206400 



V7B 
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CREF V7C (EDIT #i?16 ) 

Patch to correct printing of erroneous message 



( 



PROBLEM: 

When the coinmand string to MACRO ends with a carriage 
return, CREF prints out the message: "PROGRAM NOT IN 
COMBLK" . 

SOLUTION: 

The following patch to CREF corrects this problem. 

LOCATION OLD CONTENTS NEW CONTENTS NEW SYMBOLIC 



17136 



1714j2f 



17137 



. + 1 



To change the version number patch the following location 
in MACRO: 



LOCATION 



7461 



ULU CONTENTS 



2jaf64j2(0 



NEW CONTENTS 



3j2f64j?^ 



NEW SYMBOLIC 



V7C 
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CREF (EDIT #^18) 

Solutions to miscellaneous problems 



( 



1. Problem - Outputs one line too many for the VP15 



storage scope. 

Correction - Output one line less on each page. 

Problem - Does not detect symbols occurring after an 

operator in an expression. This was because 
CREF as soon as it saw a number after the 
equal sign in an expression terminated pro- 
cessing of current line. 

Correction - Check and make sure that the operand after 
the operator is a number before processing 
the next line; in the event the operand is 
a symbol, update the symbol table. 



Problem - Did not handle line numbers beyond 9999 
They were converted modulo 100fl!0,g,. 



10 ■ 



Correction - Handles line numbers beyond 9999 



10' 



Attached is a copy of the modified portions of the SRC listing. 
Changes are indicated by underscored and enclosed instructions. 

Users have to make note that in order to patch the new CREF 
(edit #j2fl8) into the system, MACRO-15 V7A, edit #082 has to 
be modified as follows: 



change P3ARGS=17610 on p. 5 of the SRC listing to 
P3ARGS=1762)2f 

MACRO has then to be reassembled and patched into the system. 
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Solutions to miscellaneous problems (Cont'd) 



The above becomes necessary due to the increase in size of 
CREF. If the above is not done, users are assured that 
CREF will not run. 

NOTE WELL 

The following source code modifications do not 
encompass the program correction to CREF des- 
cribed as a binary patch in the preceding 
article. Also, subsequent CREF articles with 
patches will show corrections to the original 
version of CREF (edit #016) rather than to this 
one. 



PAGE 11 

406 

407 
408 
409 
410 
411 
412 
413 
414 



CREF 



16240 



018 



CREF 





017642 


LSTLIN=EXPAGE+1 




017643 


LSTPGE=LSTLIN+1 




017644 


MULTIN=LSTPGE+1 


236 


000000 


OVRLl 


237 


777713 


LINCNT =65 



000040 



/ 

/CHARACTER CONSTANTS 

/ . OCT 

SPACE 40 
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CREF 










558 
559 






/SUBROUTINE 
/ 


TAGPRO 






560 
561 
562 
563 
564 


16426 


000000 


/TAGPRO RECEIVES CONTROL IF 

/OF A STATEMENT IS AN ALPHA 

/DIRECT ASSIGNMENTS ARE ALSO 

/ 

TAGPRO 


THE FIRST 
OR DOT 
HANDLED HERE 

/ 


588 
589 


16456 
16457 
16460 
16461 
16462 

16463 
16464 
16465 
16466 
16467 
16470 

16471 


116746 
117503 
116764 
616463 
616154 

116607 
116764 
616463 
116702 
616455 
616154 

116607 
116607 






JMS 
JMS 


FALPHA 
ADRPRO 




/IS IT AL 
/YES, TRE 


590 
591 






JMS 
JMP 


NUMERC 
CHKSYM 


/NO, 
/YES 


CHECK IF IT 
, NOW CHECK IT 


592 






JMP 


NXTLIN 




/NO 


593 
594 
595 
596 
597 
598 
599 
600 


/ 
/ 
CHKSYM 


JMS 
JMS 
JMP 
JMS 
JMP 
JMP 


GETCHR 

NUMERC 

CHKSYM 

ADRDEL 

TAGDIR+1 

NXTLIN 


/CHECK IF CHARACTE 
/YES, LOOP 
/NO, CHECK IF NEXT 
/YES, CHECK FOR S 
/NO, GO TO NEXT L 


601 
602 

603 
604 


/ 
/ 

TAC 
/ 


3END 


JMS 


GETCHR 


/EDIT #16 
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PAGE 26 CREF 

1018 

1019 17174 

1020 17175 
1021 
1022 
1023 
1024 
1025 
1026 
1027 

1028 17176 

1029 17177 

1030 17200 

1031 17201 
1032 

1033 17202 
1034 
1035 



018 



000000 
157313 



673323 
023420 
056236 
641002 

117230 



CREF 

/ 
UNDEC 




DZM 



OINIT 



/ 

/FLAG LEAD 



DTENTH 



.IFUND DOS 15 

DAC OVRLl 

JMS DIVIDE 

LAC OVRLl 

LAC DTENTH 

.ENDC 

.IFDEF D0S15 

IDIVlSHAL 

23420 

DAC OVRLl 

LACQ 

• ENDC 

JMS UNSEND 



/10000 DEC. 



.IFUND 
DAC 



DOS 15 
OVRLl 



( 



PAGE 


27 CF 


lEF 01 


1040 
1041 
1042 
1043 
1044 


17203 
17204 
17205 
17206 


216236 
673323 
001750 
056236 



CREF 



.IFDEF DOS 15 

LAC OVRLl 

IDIVlSHAL 

17 50 /1000 DEC 

DAC OVRLl 
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Solutions to miscellaneous problems (Cont'd) 



PAGE 2 8 



CREF 



018 



CREF 



( 



1093 


17253 


516312 


1094 


17254 


057174 


1113 


17276 


217303 


1114 


17277 


117151 


1115 


17300 


217304 


1116 


17301 


117151 


1117 


17302 


617273 


1118 


17303 


401501 




17304 


032217 


1122 


17305 


000000 


1123 


17306 


777773 


1124 


17307 


056633 


1125 


17310 


216272 


1126 


17311 


057321 


1127 


17312 


216317 


1128 


17313 


056367 


1129 


17314 


777770 


1130 


17315 


057550 


1131 


17316 


637305 


PAGE 


30 CREF 01 


1198 


17411 


637365 


1199 


17412 


637365 


1212 


17421 


117174 


1213 


17422 


777775 


1214 


17423 


056746 


1215 


17424 


216240 


1236 


17451 


000766 


1237 


17452 


000012 


1238 


17453 


777713 


1239 


17454 


056237 


1240 


17455 


637413 



AND 
DAC 



L77777 
UNDEC 



MACRO 



LAC MACR /PRINT 'MACRO' IN 
JMS UNSIX /OCTAL VA 

LAC MACR+1 
JMS UNSIX 
JMP MACRO- 3 



MarR 



OINIT 



QTYRT 



MAPRn' 





LAW -5 

DAC GETPTR 

LAC 18 /REINITIALIZE POINTER 

DAC OPACK+2 



/8 LINE NUMBERS P 



CREF 



LAC 


linbf;^ 


DAC 


CHRCNT 


LAW 


-10 


DAC 


OFLAG 


JMP* 


OINIT 


JMP* 


OWRITE 


JMP* 


OWRITE 


JMS 


UNDEC 


LAW 


-3 


DAC 


ALPHA 


LAC 


SPACE 


CAL+766 




12 




LAW 


-65 


DAC 


LINCNT 


JMP* 


LINHDR 
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MACRO-15 V7D (EDIT #082) 

Leading commas in command string foiled BOSS-15 operation 



( 



PROBLEM: 

In MACRO V7C, leading commas are not ignored in the input 
command string. This prevents successful operation under 
BOSS-15. 

SOLUTION: 

Using PATCH, make the following binary corrections to MACRO: 

LOCATION OLD CONTENTS NEW CONTENTS NEW SYMBOLIC COMMENTS 



JMP PATCH /PATCH AREA 
SAD COMMA /IS IT A COMMA? 
JMP CMDSUB-5 /YES-GET CHAR. 
DZM PRVCHR /NO, RESTORE 
JMP CMDSUB-l /AND CONTINUE 

/.ASCII FOR COMMA 

/V7D 



7247 


154431 


JMP 17566 


17566 





SAD 17572 


17567 





JMP 7244 


1757|2( 





DZM 14431 


17571 





JMP 7250 


17572 





54 


7461 


20^^00 


406400 
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MACRQ-15 V7E (EDIT #^82) 



Problem with parameter file name being assigned to 
listing file 



PROBLEM: 

MACRO-15 assigns the parameter file name (when present on 
a file-oriented device) to the listing file on the file- 
oriented device assigned to DAT-12. 

SOLUTION : 



( 



Use PATCH to make the following binary corrections to MACRO, 
Note that the source code notation on the right need not be 
keyed in. It is shown only for information purposes. 

PATCH Vxx 

> MACRO 

>L 17114 

>17114/2j2f701j2f>2i2f7j2f21 LAC OUTNAM 

>17115/j2f57101> 

>17116/2)2f7J2fll>207jaf22<ALT> LAC OUTNAM+1 

>L 7461 

>|af7461/4J?64J?;?>5j2f64j2fj2f<ALT> V7E 

>EXIT 



c 



Software Product 
DOS-15 


Version 
V2A 


Component 

MACRO-15 


Version 
V7E 


Edit * 
82 


Subprogram or Additional Information 


Sequence * 
11 


PAGE 
1 OF 1 


New Replacement Article 

1 


Original Dote 

August, 1973 



( 



( 



( 



SOFTWARE DISBMCH 


DOS-15 


October, 1973 



CREF V7F (EDIT #)?16) 

Patch to prevent NEXM system crash in an X4K environment 



PROBLEM: 

When the X-switch option (cross-reference) is used in the 
MACRO-15 command string input, CREF crashes the system 
through a NEXM (non-existent memory) reference in systems 
using 2|3fK or 28K of memory. 

SOLUTION: 

Use PATCH to make the following binary corrections to CREF 
and to MACRO. The source code notation to the right need 
not be keyed in; it is shown for the purpose of illustration. 



( 



PATCH Vxx 

>CREF 

>L 15667 

>15667/356470>74.0j2fJ2f0<ALT> 

>MACRO 

>L 7461 

>J2f7461/5ja(64j2(|2f>6j3f640j2f<ALT> 

>EXIT 



NOP 



V7F 
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MTF. (EDIT #j?j?6 ) 
Functional Changes 

MTF has been greatly modified. Details are on subsequent 
sheets. Standard buffer size is 377g, as returned on .INIT. 
The user may dynamically change this size by the following 
instructions: 

.GLOBL MTBSIZ 



LAC 
DAC* 



BUFSIZ 
MTBSIZ 



/(any desired buffer size) 



( 



.WRITE 



.READ 

Thus, since FIOPS re-.INIT's a handler every time I/O trans- 
fer direction is changed, one can input from magtape drive 
N with one record size^ , and output to drive M with another 
record size, bearing in mind that MTBSIZ must be called 
before transfer direction is changed. 



Record size must be less than or equal 256-j^0 words for 
FORTRAN .read's and .WRITE 's. Larger record sizes are 
possible via MACRO routines. 
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Functional Chancres (Cont'd) 



INIT 



.OPER 



,SEEK 



. ENTER 



, CLEAR 



, CLOSE 



A. Return standard buffer size of 
255 words. Buffer size can be 
changed by modifying the ,GLOBL 
MTBSIZ through a call MACRO sub- 
routine. 

B. Call .SETUP - API channel register 
48(8). 

C. Setup transfer direction (input 
or output) . 

D. If first .INIT to this device, the 
assigned default values will be 
odd parity and 800 BPI. Track 
count will be specified by bit 6 
of SCOM+4 register. {0=1 channel, 
1=9 channel) . 

E. Update the reference drive table 
that this unit is open for I/O 
transfers. 

A. .FSTAT is allowed and implemented 
AC=J2f on return. 

A. Undefined. Error return I0PS6. 

A. Undefined. Error return I0PS6. 

A. Undefined. Error return I0PS6 . 

A. Checks transfer direction. If not 
output an error return lOPS 6 is 
issued. 

B. Writes an end-of-file mark and 
returns to caller. 
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Functional Changes (Cont'd ) 



.MTAPE 



( 



00) Rewind; 



01) 
02) 



03) 



Honors the subfunction speci- 
fication as follows: 

A rewind is issued to 
the specified drive 
and control returned 
to caller. 

Undefined: Error return I0PS6. 

Backspace: A backspace is is- 
sued to backspace one 
physical record. 

Backspace file: Issue backspace 
until two end-of-file 
marks have been passed 
over, then space 
forward over the last 
end-of-file mark. 
If beginning of tape 
is sensed during the 
backspacing, the func- 
tion is terminated 
and control returned 
to the caller. 

Write EOF: Issue a write end- 
of-file mark. 

Forward space: A space forward 
is issued to forward 
space one physical 
record. If the end- 
of-tape is sensed an 
error return IOPS65 
is issued. 

Forward space file: A space 
forward is issued to 
forward space until 
an end-of-file is 
sensed. If the end-of- 
tape is sensed a IOPS65 
is issued. 

Space to logical EOT: A space 

forward is issued un- 
til two consecutive 



)?4) 
05) 



06) 



01) 
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Functional Changes (Cont'd ) 



end-of-file marks are 
passed, then a back- 
space one physical 
record is issued. If 
the end-of-tape is 
sensed a IOPS65 is 
issued. 
lj2f-»-17) Describe the tape configuration. 
The reference drive table will 
be updated for the unit refer- 
enced. Subsequent I/O transfers 
will be performed in the den- 
sity, parity and channel count 
given below: 



.READ 



Subfunction 


Count 


Parity 


Density 


11^ 


7 ■ 


Even 


2)2r(3r BPI 


11 


7 


Even 


556 


12 


7 


Even 


%n 


13 


9 


Even 


^n 


14 


7 


Odd 


in 


15 


7 


Odd 


556 


16 


7 


Odd 


8!3rj2f 


17 


9 


Odd 


8J2fJ2r 



( 



A. 



B. 



C. 
D. 



Check if referenced unit is input. 

Error return I0PS6 issued if not. 

Check if data mode is legal. Modes 

or 2; any other mode is illegal. 

Error return I0PS7 is issued. 

Initiate data transfer. 

Read errors: 

1. Parity, checksum and record 
length incorrect. The ap- 
propriate header bits are set 
and returned to the data buffer. 
Bad tape or data late. These 
are considered unrecoverable 
■^^pe errors and an error return 
IOPS65 is issued. 
End-of-file. The appropriate 
header bits are set to a 5 
and returned to the data buffer . 
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Functional changes (Cont'd ) 



4. End-of-tape. The appropriate 
header bits are set to a 6 
and returned to the data 



1 ££ 

JJUJ. J-tii . 



Any real read error (parity, 
data late or bad tape) is 
given 25 rereads before error 
action is taken. 



.WRITE 



( 



A. 
B. 



C. 

D. 



Check if referenced unit is output. 
Error return I0PS6 issued if not. 
Check if data mode is legal. Modes 
or 2; any other mode is illegal. 
Error return I0PS7 is issued. 
Initiate data transfer. 
Write errors: 

1. Any write error is given 25 
rewrites. If unsuccessful, 
six inches of tape are skipped 
and record rewritten. 

2. End-of-tape. The appropriate 
leader bits are set to 6 and 
returned to the data buffer. 



.WAIT, .WAITR 



A. Check I/O underway. 

1. Busy: Return to CAL or to ad- 

dress in CAL+2 (.WAITR). 

2. Non-busy: Return to CAL+2 or 

to CAL+3 (.WAITR) . 



• TRAN 



Allows standard core dump mode (both 
7 and 9-track look like 7-track) , and 
true 9-track mode. Bit 9 of L0C+j2f=l 
yields true 9-track. 
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Functional Changes (Cont'd) 



9-track data arrives in core with 
parity bits in bits and 1, and two 
8-bit bytes in low-order 16 bits. Thus; 



A parity 



B parity 







A 


B 



1 2-9 lpr-17 



Legal Data Modes 



OUTPU T 
A. 



lOPS BINARY (0).The checksum is completed and stored 
lOPS ASCII (2). in the second word of the line in the 

lOPS buffer area. Bits 12-13 of the 
first header word are set to zero. 
The count of words to write is taken 
from the word pair count in the header 
and transfer from the lOPS area is 
initiated. 



( 



INPUT 
A. 



lOPS BINARY (j2f) . 
lOPS ASCII (2) . 



The count of words to transfer is taken 
from the CAL sequence and input is 
initiated from the next physical block 
on tape directly into the lOPS buffer 
area. When the read is complete, the 
line validity bits are modified under 
the following conditions: bits 12-13 
of header word are set if buffer 
overflow occured. A checksum is cal- 
culated and compared with the checksum 
read. If they differ, bits 12-13 are 
set to 10. Finally, a check is made 
to assure that the line was transferred 
without hardware-detected error. If an 
error occured, bits 12-13 are set to 01 
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Functional Changes (Cont'd ) 



Recoverable Errors 



Unrecoverable Errors 



( 



A. 
B. 
C. 

D. 



Transport not ready. 
Results from: 



I0PS4 



1, 

9 



Write request with write lock. 
9-channel I/O request to 7- 
channel transport, and vice- 
versa. 

Transport off line or otherwise 
not ready. 



Remedy ; 

1. Ready the device. 

2 . Type control R on the 
teletype. 

Illegal function. I0PS6 . 
Illegal data mode. I0PS7. 
End-of-tape encountered on 
a file spacing command. IOPS44. 
Unrecoverable mag tape error 
(data late or bad tape) . IOPS65, 
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MTF. (EDIT i001) 
Returning status on a .WAIT 

PROBLEM: 

Magnetic Tape (MT) handlers which support .WAIT are expected 
to return MT status in the AC. System programs like MTDUMP 
utilize this information for proper operation. MTF. 006 
did not return the status on a .WAIT. 

SOLUTION: 

The following SRC modification to MTF. edit #j2f06 corrects 
this problem. 



Page 18 
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MTF. 



J1000 R 400773 R 

01001 R 441232 R 

01002 R 200051 R 

01003 R 600107 R 

01004 R 7 41000 A 



007 



.WAIT 



/COME HERE ON 10 COMPLETE. RETURN TO CAL+2 IF WAIT, TO CAL, 
MTDONE XCT MTWTSW /lO FINISHED. SKIP IF WAIT, NOP IF 

ISZ MTARGP /WAITR, BUMP TO NON-BUSY RETURN. 

LAC MTSTAT 

/THEN RETURN THRU MTARGP. 



MTJDBR 

/ 
MTSKIP 



JMP MTDBR 



SKP 
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RESMON VIA (EDIT #^57) 

Operational Note; lOPS 77 After Control Q 



( 



The SGEN program (DOSGEN) allows users with an RF15 system 
device to change the CTRL QA^REA. Should the user delete 
the QAREA, any CTRL Q dump would produce disastrous results, 
by overwriting the disk. The Resident Monitor therefore checks 
the size of the QAREA before it allows any dumps. If the QAREA 
is too small for the current core size, the Resident Monitor 
will give lOPS 77 after any of the following: 

A program issues a .GET or .PUT macro 

The user tries a manual (CTRL Q) dump 

The user tries to restore core, using .SCOM+64 

The Resident Monitor will print a number after the lOPS 77. 
Bits 3-17 of this number will be the desired restart address 
after the dump or restore which could not be processed. 
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TELEPRINTER HANDLER VIA (EDIT #^57) 
Operational Note on Overprinting 



The teleprinter handler will support double spacing at the 
FORTRAN level. When FORTRAN outputs a line with its first 
character equal to zero, the FORTRAN OTS replaces it with 
a 21 code, which requests a double space. If the FORTRAN 
output line has a first character equal to +, the OTS 
routines output a 20 which requests an overprint (no advance) 

The teleprinter handler has been modified such that, if the 
first character in an lOPS ASCII record is an octal 20, the 
handler will do an overprint (carriage return, with no line 
feed) . If the first character is octal 21, the handler 
will do a carriage return and two line feeds. 
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DOSNRM V2B (EDIT §^60 ) 

Problem in restoring UIC's to DAT slots on LOGOUT 

Note: The V2A version of DOS-15 was provided as a tape 
update rather than as an entirely new system. This is 
described in document DEC-15-QUDA-D, "DOS-15 VIA UPDATE 
PROCEDURES". 



( 



PROBLEM: 

The DOS-15 system provides the user with the capability of 
assigning UIC's to DAT slots at SGEN time. The system will 
restore the UFDT to the UIC's assigned at the last system 
generation in the absence of "KEEP ON" commands. 

The above capability was not realizable due to a bug in 
DOSNRM V2A (edit #J2f61) . 

SOLUTION : 

The following patch corrects this problem. 



( 



Software Product 
DOS-15 


Version 

V2B 


Component 
MONITOR 


Version 

V2B 


Edit* 
60 


Subprogram or Additional Information 
DOSNRM 


Sequence * 

3 


PAGE 
1 OF 3 


New Replacement Article 
X 


Original Date 



SOFTWARE DISFAICH 



DOS-15 



PRE-1973 



Problem in restoring UIC ' s to DAT slots on LOGOUT (Cont'd ) 



DOS-15 V2A 
$PATCH 

PATCH Vl(2fA 

>D0S15 

>NB 

> 0023 6/00003 3> 3 4 

>L 6774 

>06774/076004>6 16035 

>L 6777 
06777/235567>616044 

>L 7007 
07007/060013>616050 

>L 7012 
07012/235567>616053 

>L 7020 
07020/060013>616057 

>L 7023 
07023/235567>616063 

>L 16024 

>16024/000000>14 
16025/000000>251103 
16026/000000>141 
16027/000000> 
16030/000000>220014 
16031/000000>556025 
16032/000000 >236026 
1603 3/000000 >060013 
16034/000000 >636027 
1603 5/000000 >07 6004 
16036/000000 >217 102 
16037/000000 >7 44020 
16040/000000 >3 57 101 
16041/000000 >350002 
16042/000000 >076024 
16043/000000 >606775 



LOCI 


JMP 


PATCHl 


L0C2 


JMP 


PATCH2 


L0C3 


JMP 


PATCH3 


L0C4 


JMP 


PATCH 4 


L0C5 


JMP 


PATCH 5 


LOG 6 


JMP 


PATCH 6 


L14 


14 




LUIC 


251103 


L141 


141 




UFDUPl 









LAC* 


14 




SAD 


(251103 




LAC* 


(141 




DAC* 


13 




JMP* 


UFDUPl 


PATCH 1 


DAC* 


(13 




LAC 


NODAT 




CLL! 


RAR 




TAD 


NOPAR 




TAD 


. SGNBLK 




DAC* 


(14 




JMP 


LOCl+1 
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Problem in restoring 


UIC 


s to DAT slots 


on 


LOGOUT (Cont'd) 


16^44/)2fjaf0jaf00>116027 




PATCH 2 


JMS 


UFDUPl 


16J?45/j?|af)2(j?j3f|?>44677|2( 






ISZ 


CTl 


16j2r46/0j2f0J2fj?0>616j2f44 






JMP 


PATCH 2 


16047/Gf00000>€07003 






JMP 


LOC2+4 


16050/0000j2fj2f>j2f60013 




PATCH3 


DAC 


* 13 


16j2f51/000000>476024 






ISZ^ 


" (14 


16052/jaf0J?000>607J2flJ? 






JMP 


L0C3+1 


1605 3 /)2(00000> 116027 




PATCH 4 


JMS 


UFDUPl 


16054/000000>446770 






ISZ 


CTl 


16055/000000> 515053 














ui»iir 


ri\xy^n'i 


16056/000000> 607016 






JMP 


LOC4+4 


16057/000000>060013 




PATCH5 


DAC^ 


* 13 


16060/000000>476024 






ISZ^ 


" (14 


16061/000000> 476024 






ISZ^ 


" (14 


16062/000000>607021 






JMP 


L0C5+1 


16063/000000>116027 




PATCH6 


JMS 


UFDUPl 


16064/000000>446770 






ISZ 


CTl 


16065/000000>616063 






JMP 


PATCH 6 


16066/000000>626771 






JMP" 


* UFDUPD 


> LR 1117 










> 01117/631202>631204 






V2B 




> EXIT 
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TELEPRINTER HANDLER V2C (EDIT #^64) 
Patch to support LA3jZf at 300 baud 



This patch to support LA30 at 300 baud has been revised to 
suppress echoing of the ALT-MODE (ASCII code 175) . The 
following changes are made by using the "L" command under 
PATCH . 



( 



LOCATION 


OLD CONTENTS 


NEW CONTENTS 




SYMBOLIC 


0571 


100722 


102615 




JMS 


PATCH 4 


1633 


760015 


760212 


TTLFO 


LAW 


212 


1635 


760212 


102605 


TTOCRT 


JMS 


PATCH 


1636 


102452 


740000 




NOP 




2252 


601635 


602577 


TTALFO 


JMP 


PATCH2 


2451 


741000 


602602 




JMP 


PATCH 3 


2504 


760015 


601635 




JMP 


TTOCRT 


2505 


601636 


7 40000 




NOP 




2577 


- 


760212 


PATCH 2 


LAW 


212 


2600 


- 


102452 




JMS 


TTOSVC 


2601 


- 


601637 




JMP 


TTLNFN 


2602 


- 


542547 


PATCH 3 


SAD 


TTY015 


2603 


- 


602627 




JMP 


PATCH5+1 


2604 


- 


602453 




JMP 


TTYVT3 


2605 


- 


000000 


PATCH 







2606 


- 


777770 




LAW 


-10 


2607 


- 


042625 




DAC 


TTFLCT 


2610 


- 


760015 


TTFLP 


LAW 


15 


2611 


- 


102452 




JMS 


TTOSVC 


2612 


- 


442625 




ISZ 


TTFLCT 


2613 


- 


602610 




JMP 


TTFLP 


2614 


- 


622605 




JMP* 


PATCH 
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LOCATION 


OLD CONTENTS 


NEW CONTENTS 




SYMBOLIC 


2615 


— 


000000 


PATCH4 







2616 


- 


777770 




LAW 


-10 


2617 


- 


042625 




DAC 


TTFLCT 


262r 


- 


760015 




LAW 


15 


2621 


- 


100722 




JMS 


TOUT 


2622 


- 


442625 




ISZ 


TTFLCT 


2623 


- 


602620 




JMP 


PATCH4+3 


2624 


— 


622615 




JMP* 


PATCH 4 


2625 


- 


000000 


TTFLCT 







2626 


- 


000000 


PATCH 5 







2627 


_ 


202452 




LAC 


TTOSVC 


2630 


- 


042626 




DAC 


PATCH 5 


2631 


- 


102605 




JMS 


PATCH 


2632 


— 


202626 




LAC 


PATCH 5 


2633 


- 


042452 




DAC 


TTOSVC 


2634 


- 


622452 




JMP* 


TTOSVC 


2406 


602441 


602435 




JMP 


TTLNFA-1 


101 


- 


2635 









( 



The version number is changed from V2B to V2c by making the 
following changes to the non-resident monitor (DOS-15) . Use 
"LR" command. 



1117 



631204 



631206 



V2C 



Bootstrap to refresh core. 
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RESMON V2D (EDIT #064) 

Patch to restore system configuration on "LOGOUT" 



( 



PROBLEM: 

In the current version of the DOS monitor 'V2C' on issuing 
a "LOGOUT" monitor command the system is not restored to 
the default (as specified in SGEN) configuration, as stated 
in the DOS systems manual. 

SOLUTION: 

The above problem is corrected by the following patch: 

PATCH V10A 
>D0S15_P 
>LR 5571 



LOG 



JMP 



PATCH 



PATCH 



LAC SGNBLK+5 
DAC* (.SCOM+4 
LAC* (152 
JMP LOC+1 



>g6720/235601<14452> 61612f20 (ALT ) 
> LR 14671J 

>16020/000000> 217105j 
>16021/000000> 075563J 
>16022/000000> 235601p 
>16023/000000> 606721 (ALT ) 
>PSj 
>00240/015362> 15366 (ALT ) 

>exit2 

Bootstrap to refresh core. The version number is changed 
from 'V2C' to 'V2D' by modifying 'location 1117' from 
•631206' to '631210', before exiting from PATCH. Use 'LR' 
command . 
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RESMON V2D (EDIT #^64) 

Teletype Handler . INIT function limitations 
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PROBLEM: 

A .INIT issued to the Teletype handler will not cancel a 
.READ/. WRITE which is in progress. 

The reason for this problem is that after the CAL pointer 
has been saved and the argument pointer bumped, the I/O 
underway switch (TTIOSW) is tested and, if set, the program 
loops back to the CAL. 

SOLUTION: 

.SCOM+35 contains the instruction "DZM TTIOSW". If a 
program desires to abort teletype I/O, it can merely issue 
the instruction "XCT* {.SCOM+35)", which will clear out 
the busy flag. The following is an alternate method for 
clearing the flag: 

/COMPUTE DAT -3 

/STORE IN TRANSFER VECTOR 
/C(.DAT -3) = TTA 
/TTA. -1 = TTIOSW 
/STORE IN TV 
/CLEAR TTIOSW 



LAW 


-3 


TAD* 


( . SCOM+2 3 


DAC 


DATM3 


LAW 


-1 


TAD* 


DATM3 


DAC 


TTIOSW 


DZM* 


TTIOSW 
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DOS-15 USERS MANUAL (DEC-15-0DUMA-A-D) 
Document Number Change Notice 

New #: DEC-15-0DUMA-A-D 

Old #: DEC-15-MRDA-D 

There has been no change in the contents of the above manual 
except for a few corrections of minor typographical errors 
etc., in the manual as listed below: 
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Page 
1-5 



2-lJ2f 



6-25 

6-26 

7-5 



Change 

add 'or LA3j2( DEC Writer' 
in the 5th line of Section 
1.2.2 



delete 'manipulate and' 
from the 1st line of 
Section 2.11. 

add 'DEC' in front of 
'tape storage' in item 
7 in the same section. 

change all occurrences 
of 'wrdcnt' to 'wdc' on 
this page. 

change ' nn ' to ' ds ' 
under FORMAT, 

change '3' to '1' 
under 'UNIT #?' in the 
printout depicted in 
Section 7.3.1.3. 



Comment 

new console 
terminal 
supported by 
DEC. 

PIP has limited 
capabilities 

with MT. 



for sake of 
consistency 



typographical 
error 

typographical 
error 
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uOS-15 USER'S MANUAL (Di:.C-15-0DUMA-A-D) 
Documentation error 
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PROBLEM: 

In Section 6.7.11 on page 6-23 in the DOS-15 User's Manual 
it is claimed that "beg" and "wdc" are ignored by the disk 
pack handler in the .RTRAN system MACRO call. This is 
not correct. The "beg" and "wdc" are ignored only on output, 

SOLUTION: 

The manual should read: 

ignored for output to disk pack 
instead of reading: 

ignored for disk pack 
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DOS-15 VIA UPDATE PROCEDURE (DEC-15-QUDA-u) 
Typographical error in patch to PIP 

In the patch published for DOSPIP V6B, the new contents of 
LOG 14744 should be 

JMP #+lj?4(y 
and not 

JMP #lj2f4j? 
as stated in the published article. 
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PAPER TAPE PUNcH HANDLERti 

Difference in End-of-File Code Between ADSS and DOS 



The Paper Punch Handlers in the Advanced Software System 
output the following EOF header on a .CLOSE: 

9101505 
776273 

The Handlers for DOS all output the following EOF header: 

0^1005 
776773 
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PATCH Vl)?A (EDIT #^16) 
Operation under DOS-15 



PATCH Vl^A for DOS release is functionally similar to 
earlier versions. For patching a disk, PATCH requires 
the operator to log in under the MIC. If the user fails 
to do so, PATCH will type: 

.DAT-14 NOT PATCHABLE 

When patching a disk, PATCH finds the system blocks (SYSBLK 
and COMBLK) from bits 3-17 of word 2 of the first MFD 
entry. SYSBLK and COMBLK occupy two contiguous blocks 
on the DOS-15 system device, and PATCH uses this information 
when reading or writing these two blocks. 
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PIP V6A (EDIT #|?9)?) 

Note on Implicit Data Modes 

If implicit data modes are to be used in PIP command strings, 
certain rules must be followed. 

1. It is not possible to mix data modes in one command. 

a. T DP ,,f-DK FILE1,FILE2,FILE3 (B) 

All three files must be binary files 
with a BIN Extension. 

b. T DP ,-f-DK FILEl BIN,FILE2 SRC 
This is not a legal command string. 

2. Files with extensions used by PIP to determine data 
modes should not actually be of another data mode. 

Example: 

FILEl BIN should be a file written in lOPS 
Binary mode (J? in bits 14-17 of the first 
header word) . It should not, for example, 
have been v/ritten in lOPS ASCII (2 in bits 
14-17 of the first header word) and then 
had its extension changed to BIN. 

If such a file is transferred, PIP will put the correct 
data mode code in the header words. If, however, that file 
is being transferred in a multiple file string and another 
follows it, PIP cannot handle the next file correctly. 
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Note on Implicit Data Modes (Cont'd ) 

PIP uses the following extensions as data mode indicators; 

BIN - lOPS Binary 

SRC - lOPS ASCII 

ABS - Dump 

A number in the third location of the extension 
(e.g., ABL FZ2) makes PIP assume the file is in 
lOPS ASCII. 
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PIP V6A (EDIT #i2f9JZf) 

Restriction on Diskpack to Diskpack copies 

PROBLEM: 

One cannot use PIP to COPY the contents of a UFD on one 
pack to another if the UIC's are the same. 

>C DPl^DPj?J 

for example will not work. 
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PIP V6B (EDIT #jZf9jg) 
Segmenting files under BOSS-15 

PROBLEM: 

When using PIP V6A under BOSS-15 to segment files, it was 
not possible to key in CTRL P as needed. Also, in violation 
of system convention, PIP would restart itself following an 
(H) mode COPY command instead of exiting to the monitor. 

SOLUTION: 

Make the following patches to PIP using the "LR" command 
to list locations. 
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LOCATION 


OLD CONTENTS 


NEW CONTENTS 


NEW SYMBOLIC 


COMMENTS 


Ii2f32 


633202 


633204 


V6B 




Ij2f40 


776 


775 


-3 


/OUTPUT TO -3 


1037 


154473 


JMP #+14736 


JMP PATCH 


/PATCH AREA 


14736 





DZM #+14473 


DZM YEOFSW 


/RESTORE INST. 


14737 





LAC* #+14527 


LAC* (BOSS 


/BOSS REGISTER 


14740 





XOR #+14644 


XOR (20000 


/IF BIT 4 


14741 





AND #+14644 


AND (20000 


/IS NOT SET. 


14742 





XOR* #+14527 


XOR* (BOSS 


/SET IT FOR fP 


14743 





DAC* #+14527 


DAC* (BOSS 


/SAVE IT 


14744 





JMP #+1040 


JMP RESTRT+2 


/RETURN 


13537 


776 


775 


-3 


/OUTPUT TO -3 


13535 


741200 


JMP #+14745 


JMP PATCH 




14745 





SNA 


SNA 


/RESTORE INST. 


14746 





JMP #+1036 


JMP RESTRT 




14747 





LAC* #+14527 


LAC* (BOSS 


/BOSS REGISTER 
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Segmenting files under BOSS-15 (Cont'd ) 



-> 

LOCATION 


OLD 


CONTENTS 


NEVJ CONTENTS 


NEW SYMBOLIC 


COMMENTS 


14750 







XOR #+14644 


XOR (20000 


/SET BIT 4 


14751 







AND #+14644 


AND (20000 


/OF .SCOM+52 


14752 







XOR* #+14527 


XOR* (BOSS 


/FOR +P 


14753 







DAC* #+14527 


DAC* (BOSS 


/ 


14754 







JMP #+13537 


JMP NUORRE+4 


/RETURN 


13106 


113520 


JMP #+14755 


JMP PATCH 


/PATCH 


14755 







JMS #+13520 


JMS ZCLOS 


/RESTORE 


14756 







LAC #+14512 


LAC XITFLG 


/IS EXIT 


14757 







SZA 




/FLAG SET? 


14760 







JMP #+13107 


JMP PIP-3 


/NO, RESTART 


14761 







JMP #+13571 


JMP BOSEXT 


/YES, EXIT 
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PIP V6C (EDIT #090) 

Patch to Transfer All Files in a 'C Function 



PROBLEM: 

In DOSPIP V6B if a COPY command with no switches is typed 
and there are seventy files to be transferred, only sixty- 
six files will be transferred. 

SOLUTION : 

Using the "LR" command to patch PIP, make the following binary 
corrections . 



LOCATION 



OLD CONTENTS 



NEW CONTENTS 



NEW SYMBOLIC 
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4747 
1032 



354542 
633204 



TAD #+7314 
633206 



TAD LMl 
V6C 
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PIF V6D (EDIT f090) 

Patch to correct problem in Transferring Multiple Files 
from Card Readers 
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PIP V6C will cause the system to hang if an attempt is made 
to read more than 1 file from the card reader, using the 
"T" function. 

The machine will be in a tight loop. 

XXX JMP XXX 

The above is due to the fact that the program on reaching 
an EOF thinks it is reading from a paper tape reader and 
it waits for the user to type fP (indicating presence of 
new medium) to continue. 

SOLUTION: 

Use PATCH to make the following binary corrections to PIP. 
The source code notation to the right is for information 
only and need not be keyed in. 

$PATCH^ 
PATCH Vl^A 

> pifJ 

> LR 5574J 

>l)?421/61J2f435<i?5610> 610551 
> LR 1032 J 

>03657/6332^6>63321j2( (ALT) 
> EXIT^ 

Bootstrap to refresh core. 



(ALT) 



JMP ZEOF 
V6D 
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PIP V6E (EDIT #i?9j2f) 

Patch to Correct Problem with 'N' Function when 'Snn' 
Switch Option is Used 
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PIP V6D (Edit #^9j2f) does not handle the 'Snn' switch option 
in an 'N' function properly. This is due to a programming 
error in the ZS CODE section of the program. 

SOLUTION: 

The following patch corrects this problem. The source code 
notation to the right is for information only and need not 
be keyed in. 

$PATCH 

PATCH Vlj2fA 

>PIP 

>LR 7237 

>12j2f64/7452j2fj?>SNA!CLL!CML 

>LR 7243 

>12iJ7j2f/612/2(74<|2f7247>JMP #+14762 

>LR 14762 

>176j2f7/|2fj2(J2(J2fJ2(j?>LAC #+14556 

>1761J2f/000J2fJ2f0>DAC #+145j2f2 

>17611/^j2(i?^^j2f>JMP #+7247 

>LR Ij2f32 

>J2r3657/63321)2f>633212 

>EXIT 



LAC {100 
DAC DIRBLK 
JMP DTCLER 

V6E 
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PIP VTA (EDIT #Jg91) 

Problem with 'C switch option in a 'T' function 

PROBLEM: 

In DOSPIP the user can use the "C" switch option for a 
"T" function. This provides him with the capability of 
converting two or more spaces into tabs. 

The above capability was not realizable due to improper 
handling of the "C" switch option, in DOSPIP V6A. 



( 



SOLUTION: 

The following SRC level changes correct this problem. 
Changes are indicated by underscored and enclosed 
instructions. The print-out of an example which explains 
the operation of the "C" switch option for a "T" function 
is provided at the end. Note well that these changes do 
not encompass the corrections to PIP from the preceding 
articles and that those patches cannot be made as is to 
PIP V7A because of the shift in code position. 
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Problem with 'C switch option in a 'T' function (Cont'd) 



PAGE 79 

35J?2 

3503 

3504 

3505 

3506 

3507 

3508 

3509 

3510 

3511 

3512 

3513 

3514 

3515 

3516 

3517 

3518 

3519 

3520 

3521 

3522 

3523 

3524 

3525 

3526 

3527 

3528 

3529 

3530 

3531 

3532 

3533 



DOSPIP 091 



CECHECK: C,E,T SWITCH PROCESSOR. 



06525 
06526 
6527 
06530 
06531 
06532 

06533 

06534 

06535 

J? 6536 

06537 

06540 

06541 

06542 

06543 

06544 

06545 

06546 

06547 

06550 

06551 

06552 

06553 

06554 

06555 

06556 

06557 

06560 

06561 

06562 

06563 



R 000000 A 

R 346620 R 

R 054534 R 

R 741200 A 

R 606542 R 

R 106607 R 

006533 R 

R 000011 A 

R 214534 R 

R 740001 A 

R 354555 R 

R 746010 A 

R 7 40010 A 

R 054 53 4 R 

R 211120 R 

R 741200 A 

R 606547 R 

R 206657 

R 606560 

R 146657 

R 214534 

R 740200 

R 606563 

R 206525 R 

R 740001 A 

R 354656 

R 046657 

R 354621 

R 740001 

R 106607 

R 000040 A 

R 206617 R 



R 
R 
R 
R 
A 
R 



Rl 



LIT11= 
HT 





TAD MQ2 

DAC TEMPO 

SNA 

JMP NOTABS 

JMS OUTBUN 

11 



/SAVE TO BUMP (MAYBE) 

/Q1=Q2: NO T 
/OUTPUT Q2-Q 



LAC TEMPO /CONVERT # OF TABS 

CMA /TO A POSITIVE 

TAD (1 /NUMBER 

CLLIRTL /MULTIPLY BY 

RAL /EIGHT 

DAC TEMPO /SAVE TO BUMP TYPPOS 



NOTABS 



LAC CNTSW 
SNA 

JMP .+3 
LAC CSET 





JMP TAGl 




DZM CSET 




LAC TEMPO 




SZA 




JMP NOSPC 




LAC Rl 




CMA 




TAD (11 




DAC CSET 




TAD (-1 


TAGl 


CMA 



ONESPl 

LIT40 

NOSPC 



JMS OUTBUN 

40 

LAC TYPPOS 



/ZERO, IN CASE WE SE 
/CHECK IF WE SENT AN 
/SKIP IF NO 
/YES, DONT SEND ANY 



/OUTPUT 8-R 
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Problem with 'C switch option in a 'T' function (Cont'd) 



PAGE 


80 


DOSPIP 091 


CECHECK: C,E,T SWITCH 


PROCESSOR. 


3534 




06564 R 354534 R 




TAD TEMPO 




3535 




06565 R 346657 R 




TAD CSET 




3536 




06566 R 046617 R 




DAC TYPPOS 


/T=T+S (+1 


3537 




06567 R 146657 R 




DZM CSET 


/S=0. 


3538 




06570 R 606466 R 




JMP TOUTCH 


/GO OUTPUT 


3539 




06571 R 750ja(01 A 


TONESP 


CLC 




3540 




06572 R 606561 R 




JMP ONESPl 


/OUTPUT ON 



DOSPIP V7A 

>T TT -«-DK PIPTST SRC 



( 



1234567 8123456781234567812345678123456781234567 81234567812345678 
X X XXX XXX 

XXX X X 
X X X X 
XXX 
XXX X 

DOSPIP V7A 

>T TT-<-DK PIPTST (AC) 

1234567812345678123456781234567812345678123456781234567812345678 
X X XXX XXX 

XXX X X 
X X X X 

XXX 
XXX X 

DOSPIP V7A 
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SYSTEM 



Conversion from ADSS-15: Programs may not fit 



PROBLEM: 

When updating ADSS systems to DOS-15 VIA, sometimes the 
user's programs do not fit. This symptom has several 
possible causes: 

1. The FORTRAN OTS library has grown in average size of 
routine by about 1)3-15%. 

2 . There are a number of core-consuming monitor environ- 
mental considerations- 



( 



- LP ON 

- VT ON 

- Size of monitor patch area 

- Size of buffer pool 

- Size of buffers 

- Size of .DAT table 



which are not present in ADSS, but can help to 
exhaust core quickly if not handled properly. 

3. The resident monitor itself (RESMON) has grown by 
approximately (200-|0) words. 

Sometimes this size increase is just enough to force a 
device handler to be loaded in the second memory field 
(4K page) instead of the first, leaving a non-obvious 
hole in low core. 



( 



SOLUTION: 

If this occurs, enable bank mode operation since it ignores 
4K boundaries and loads to 8K bounds. 
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SYSTEM HARDWARE 



Minimum and Optional Hardware for DOS-15 System 
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The equipment configuration for the utilization of the 
DOS-15 softv;are facilities includes a PDP-15/20 computer 
with 16K of memory and at least one DECdisk or Disk Pack. 

A. The minimiim hardware required by DOS consists of: 

PDP-15 with 16K, 18-bit, 800-NS core memory 

+KSR-35 or KSR-33 Teleprinter 

+PC15 High-Speed Paper Tape Reader and Punch 

+KE15 Extended Arithmetic Element 



TC15 DECtape Control with 1 TU56 Dual DECtape 
Transport or 2 TU55 DECtape transports 

or 

TC59 Magtape Control with 1 TUl/J, TU2J2I, or 
11330 Magtape Transport (7- or 9-track) 

RF15 DECdisk control with 1 RSJ2(9 DECdisk 
Drive (262,144 words) 

or 

RP15 Disk Pack Control 

1 RPJ2I2 Disk Pack Drive (lj^.24 million words) 
1 RPi32P Disk Pack 
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Minimum and Optional Hardware for DOS-15 System (Cont'd) 



B. The optional hardware supported by DOS is as follows: 

PDP-15 with 32K, 18-bit, core memory 

KA15 Automatic Priority Interrupt 

KW15 Real Time Clock 

FP15 Floating Point Processor 

KSR-33 Teleprinter 

PCI 5 High Speed Paper Tape Reader and Punch 

TC15 DECtape Control with up to 4 TU56 
Dual DECtape Transports or 8 TU55 DECtape 
Transports 

RF15 DECdisk Control with up to 8 RS)Zf9 DECdisk 
Drives (262,144 words per drive) 

RP15 Disk Pack Control with up to 8 RP^2 
Disk Pack Drives {10,6jiS0,000 words per drive) 

TC59 Magtape Control with up to 8 TUIJJ, TU2J?, 
or TU30 Magnetic Tape Transports (7- or 9- 
track) 

CR03B 20ji cpm Reader and Control 

or 
CR15 1^00 cpm Reader and Control 

VP15 Point Plotting Display 

or 
VT15 Graphic Display Processor 

with 
VTj2f4 Graphic Display Console 
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Minimum and Optional Hardware for DOS-15 System (Cont'd ) 

LK35 Keyboard 

Line Printers* 

LP15C - ll6(i^ 1pm, 132 column line 
LP15F - 356 1pm, 8^3 column line 

VWA Writing Tablet 



*Other line printers supported are the LP15H, LP15J and 
LP15K, which operate from the LP15F Controller. 
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Radix 5J0„ Format 



Progrconming Note 



Radix 5j3q is a technique used by the MACRO Assembler and 
the FORTRAN Compiler to condense the binary representation 
of symbolic names in symbol tables. It is described in 
Appendix A of the Linking Loader Utility Manual. The 
following Radix 5^g table should be added to the description 
in the Linking Loaaer Manual : 
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x~ 



A 
B 
C 
D 
E 
F 
G 
H 
I 
J 
K 
L 
M 
N 

P 

Q 
R 
S 
T 
U 
V 
W 
X 
Y 
Z 




1 
2 
3 

4 
5 
6 
7 
8 
9 
# 



003100 

006200 

011300 

014400 

017500 

022600 

025700 

031000 

034100 

037200 

042300 

045400 

050500 

053600 

056700 

062000 

065100 

070200 

073300 

076400 

101500 

104600 

107700 

113000 

116100 

121200 

124300 

127400 

132500 

135600 

140700 

144000 

147100 

152200 

155300 

1 r r\ A f\ r\ 
XDU'i UU 

163500 
166600 
171700 



-X- 



— X 



A 
B 
C 
D 
E 
F 
G 
H 
I 
J 
K 
L 
M 
N 

P 

Q 
R 
S 
T 
U 
V 
W 
X 
Y 
Z 
% 
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2 
3 

4 
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6 

/ 
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9 
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000050 

000120 

000170 

000240 

000310 

000360 

000430 

000500 

000550 

000620 

000670 

000740 

001010 

001060 

001130 

001200 

001250 

001320 

001370 

001440 

001510 

001560 

001630 

001700 

001750 

002020 

002070 

002140 

002210 

002260 

002330 

002400 

002450 

002520 

002570 

n rv o *r ^ A 

002710 
002760 
003030 
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000001 

000002 

000003 

000004 

000005 

000006 

000007 

000010 

000011 

000012 

000013 

000014 

000015 

000016 

000017 

000020 

000021 

000022 

000023 

000024 

000025 

000026 

000027 

000030 

000031 

000032 

000033 

000034 

000035 

000036 

000037 

000040 

000041 

000042 

000043 

r\r\r\r\ A a 

u VJ VJ U"* ■* 

000045 
000046 
000047 



( 



New 



Replacement Article 



CD 



Version 
V2A 



Version 
N/A 



Sequence * 

3 



Edit* 
N/A 



PAGE 

2 OF 2 



( 



Original Date 



( 



SOFTWARE DISFM:H 


DOS-15 


PRE-1973 



SGEN VIA (EDIT #03 6 ) 

Relative Positions of the Clock and Line Printer Skip lOT's 

PROBLEM: 

Disk Pack systems have been supplied with the line printer 
skip before the clock skip. Under rare circumstances, 
this will cause the system to hang mysteriously. 

SOLUTION : 

During System Generation, therefore, the System Manager 
must ensure that the clock skip, "CLSF", comes before 
the line printer skip, "LSDF". The rest of the skip 
chain is in good order. 
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UPDATE VlJZfA (EDIT #J2f01 ) 

Note on Program File Extensions 



The Linking Loader code (33g) allows UPDATE to retrieve the 
extension of the source program for information purposes. 
UPDATE will print this information when the user specifies 
the LIST (L) option in the file specification command. 
If the Linking Loader code 33 is missing from a relocatable 
binary file, UPDATE will not insert a code 33 or extension. 
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UPDATE VlJgfA (EDIT #0^1 ) 

Note on G option and FREE Command 

G-Option 

The GET (G) option is the file specification command 
option that allows the free command to be legal. The 
G-option is legal only with the L and S options, and 
only the FREE (F) , END (E) and CLOSE (C) commands 
are legal. 

F REE ( F ) C ommand 

Frees the named file from the library file, and makes it 
a separate file on the output device. 

FORMAT: 

FREE (F) FILENAME <CR> or ALT MODE 

The FREE command can only be used with the G-option. If 
the user gives the FREE command without specifying the 
G-option, UPDATE will type: 

VALID ONLY IN GET MODE 
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UPDATE V1J3A (EDIT #j2fjZfl ) 
Note on Error Conditions 

1. If, after a CLOSE command, the named library file is 
alreadv on -t-bo on-i-niT)- HoTr-i no . rjpnaT'R t«7t 1 1 DTird- +-he 

following: 

NAMED FILE ALREADY ON OUTPUT DEVICE 

DO YOU WISH TO CONTINUE (Y/N) 
Any response to the above other than: 

Y<CR> or YES<CR> 

will be interpreted as a "no". If Y or YES, UPDATE 
will delete the old file and rename the WRK file 
with the old file's name. If not Y or YES, UPDATE 
will type: 

COMMAND IGNORED 

and the user may type in a new CLOSE command with a 
different file name, a normal close, or exit to the 
nonresident Monitor. 

NOTE: If the user exits back to the monitor, the new 
or updated file will be present on the output device 
under a work extension (WRK) . If the DOS-15 disk 
handlers are not being used (e.g., with DECtape) , the 
A-version is required. This is because the new code 
uses the .FSTAT system macro. If only one file is 



to be open on DECtape, the 
be used. 



'E" or "D" handlers could 



If, after an INSERT (I) or REPLACE (R) command, the 
file name (typed) and the program name (in the binary 
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Note on Error Conditions (Cont'd ) 

code) are not the same, and the device on .DAT- 10 
is a directoried (file-oriented) device, UPDATE 
will print the following: 

PROGRAM NAME DISCREPANCY 

FILE NAME — (name) 

PROGRAM NAME — (name) 

SOURCE EXT — (extension) 

DO YOU WISH TO ACCEPT COMMAND (Y/N) 

Any response to the above, other than: 

Y <CR> or YES <CR> 
will be considered a "NO", and UPDATE will type: 

COMMAND IGNORED 
If Y or YES, UPDATE will type: 

DO YOU WISH TO USE FILE NAME (Y/N) 

In the user's response, UPDATE follows the same con- 
ventions in determining a YES or a NO. If NO, 
UPDATE will use the program's name. In either case, 
UPDATE will type: 

SOURCE EXT WANTED 

The user should then type zero-to-three characters, 
and terminate with a carriage return. If the user 
types a carriage return only, then the extension will 
be omitted from the program unit. The extension 
must be made up of legal RADIX 50 characters. 
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Note on Error Conditions (Cont'd) 



( 



2-b. After an INSERT (I) or REPLACE (R) command, if the 
file name (typed) and the program name (in the 
binary code) are not the same, and the device on 
.DAT-10 is not a directoried (i.e., non-file 
oriented) mass storage device, UPDATE will print: 

PROGRAM NAME DISCREPANCY 

FILE NAME — (name) 

PROGRAM NAME — (name) 

SOURCE EXT — (extension) 

DO YOU WISH TO CHANGE INPUT (Y/N) 

The convention for yes and no answers is as above. 

If yes, UPDATE will type: 

CHANGE INPUT AND +P 
If no, UPDATE will type: 

DO YOU WISH TO USE FILE NAME (Y/N) 

A yes reply will update the library with the file 
name; a no will cause UPDATE to use the program's 
name. 

In either case, UPDATE will then type: 

SOURCE EXT WANTED 

The user should then type zero-to-three characters, 
and terminate with a carriage return. If the user 
types a carriage return only, the extension will 
be omitted from the program unit. The source 
extension must be made up of legal RADIX 50 
characters. 
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Note on Error Conditions (Cont'd) 



NOTE: In the case of discrepancy between typed 
name and binary name, the sense of the questions 
for directoried devices (DECtape, disk and some 
Magtape) is opposite to that for non-directoried 
devices (paper tape reader, and some Magtape) , 
Thus, a NO for a directoried device has the effect 
of a YES for the non-directoried devices. The 
user should therefore read the questions carefully. 

2-c. More information on REPLACE and INSERT 

If the secondary input device (.DAT-lJ2f) is a 
directoried device (that is, file-oriented), 
UPDATE will now do a .FSTAT for the file name in 
the command string for REPLACE or INSERT. If 
the file is not found, UPDATE will type: 

FILE NOT FOUND 
COMMAND IGNORED 

If the secondary input device is not a directoried 
device (non-file oriented) , and the first buffer 
of the unit to be inserted contains an End-of-File 
or End-of -Medium header word pair, UPDATE will type; 

PGM UNIT NOT FOUND 

FILE POSITIONING COMPLETED 

COMMAND IGNORED 

3. If UPDATE discovers that the file named in a FREE 
command is already on the output device, it types 
the following message: 

M7\MT?n -PTTT? aLREAT^V ON OTTTPTTT DEVICE 
DO YOU WISH TO CONTINUE (Y/N) 
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Note on Error Conditions (Cont'd) 
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If the answer is Y or YES, UPDATE will delete the 
file already present on the output device, and 
write the one derived from the object library. 
The object library itself is not affected. If 
the answer is not Y or YES, UPDATE types: 

COMMAND IGNORED 

If, after a FREE command is made, UPDATE cannot 
find the named file in the library, UPDATE will 
type: 

EOF REACHED BY SEARCH 

If, after a FREE command is made, UPDATE finds the 
named file, but cannot find the .END Linking Loader 
code (27o) within the named file, UPDATE will print: 

o 
END OF FILE FOUND 

which indicates the library is no longer valid. 
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UPDATE VlJZfB (EDIT #J2fia2 ) 
Why VlJZfB and not VllA 



PROBLEM: 

A new source level version of UPDATE was distributed with 
the second of the updates to the DOS-15 system as 
described in DEC-15-0DUDA-B-D, "DOS-15 Update, Number 2". 
The source file name is UPDATE 002. According to the rules 
for assigning program version numbers a source file 
change should have caused the version number to go from 
Vlj2fA to VllA; instead, the source was edited to print 
VlJ2fB, which indicates erroneously that there has been a 
patch. 



( 



SOLUTION: 

This discrepancy, which has no operational effect, will 
be corrected in the next release of the software. 
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UPDATE VlJZfC (EDIT #002 ) 

Patch to correctly read the EOF/EOM record 



PROBLEM: 

UPDATE V10B detects a record with linking loader code 
27 as the last record, instead of the record with EOF/EOM. 
As a result when secondary input is from a papertape, 
the record with the EOF/EOM is not read. 



SOLUTION: 

The following patch to UPDATE corrects this problem. 



( 



DOS-15 V2A 

$MICLOG SYS 

$ PATCH 

PATCH Vlj3A 

> UPDATE 

>L 16041 

>160Al/000n0>ll4710 

>lb0S0/00000S>611513> 

>16jrf51/152546>616i^l^£f 

>L 16421 

>16421/41)^32j2f>41432je( 

>L 17573 

>11513/000000>110 PATCH CAL+770 

>11514/000000>(> 6 

>17575/|2fj2fj2f00^>152546 DZM SRCEXT 



JMS READ 
JMP PATCH 
JMP WRONGP 



>115ie/000000>62SlU 

>EXIT 



/READ. EOF/EOM? 

/YES. CLOSE FILE & EXIT 

/NO. REPORT TO USER 

/Vlj3C 

/CLOSE INPUT 

/RESET FILE EXT 



JMP* INSUNT /DONE-EXIT 
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ROTATE (SRC ) 
Functional Description 



The Linking Loader allows the VT handler to reside in 
lOS. There are two new calls to the graphics software: 
ROTATE and CIRCLE. 



( 



ROTATE modifies a user's array so that he may plot a 
three dimensional figure. A single call to ROTATE 
will effect a rotation about one or more of the X, Y 
or Z axes. A rotation about any other axis will require 
one or two more calls to rotate. Note that ROTATE uses 
the same left-handed system that the rest of the 
Graphics Software uses. That is, origin at the center 
of the screen, X horizontal, positive to the right, Y 
vertical, positive up, and Z = YxX (positive into the 
screen) . Systems with a different origin will require a 
translation followed by the rotation (s) followed by a 
re translation. 

Programmers should use ROTATE carefully. A rotation of 
a large figure in the X-Y plane about the Z-axis, for 
example, may cause part or all of the figure to disappear. 
This will happen whenever one end-point of a line passes 
off the screen. The cautious programmer will save the 
original buffer before calling ROTATE, and be prepared 
to reduce the size of the figure, should a rotation destroy 
parts of the picture. 
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Functional Description (Cont'd ) 

Here are the FORTRAN and MACRO formats for calls to 
ROTATE : 

FORTRAN : 

CALL ROTATE (ISTR, lA, IB, IC, X, Y, Z, SINA, CSA) 



MACRO: 



, GLOBL 

JMS* 

JMP 

.DSA 

.DSA 

• DSA 

.DSA 

.DSA 

.DSA 

.DSA 

.DSA 

.DSA 



ROTATE 

ROTATE 

.+12 

ISTR 

lA 

IB 

IC 

X 

Y 

Z 

SINA 

CSA 



The input variables for ROTATE are as follows: 

1. ISTR is the array length, in locations. 

2. lA specifies whether rotation about the z axis is 
desired. 

If IA=1, rotation will occur about the Z -axis. 
If IA=0, there will be no rotation about the 
X-axis. 

3. IB specifies whether rotation about the Y-axis is desired. 

IB=1 indicates rotation is desired, as with lA. 

4. IC specifies whether rotation about the X-axis is desired, 

IC=1 indicates rotation is desired, as with lA. 
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Functional Description (Cont'd ) 

5. X is the name of the X array. 

6. Y is the name of the Y array. 

7. Z is the name of the Z array. 

8. SINA is the sine of the angle of rotation. 

9. CSA is the cosine of the angle of rotation. 



( 



Restrictions: 

The values in the user's array must be in floating point 
format. 

The user must calculate the sine and cosine of the 
angle of rotation before he calls ROTATE. 

It is up to the user to change integers into floating 
point numbers and make the correct calls for displaying 
the rotated figure. 
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CIRCLE (SRC ) 

Functional Description 

The CIRCLE subroutine will construct approximations of 
arcs and circles as subpictures. (The approximations 
are really a series of chords. Tue user may specij-y 
how long the chords should be.) The user may subsequently 
display such subpictures with the proper calls to the 
handler. The subpicture will be at the array named 
in the call. 

Here is the form for calls to CIRCLE: 

FORTRAN : 

CALL CIRCLE (R, THETA, GAMA, DEC, PNAME) 

MACRO: 



( 



. GLOBL 


CIRCLE 


JMS* 


CIRCLE 


JME 


.+7 


.DSA 


R 


.DSA 


THETA 


.DSA 


GAMA 


.DSA 


DEG 


.DSA 


PNAME 



The input variables for CIRCLE are as follows: 

1. R is the radius of the circle, in Raster units. 

2. THETA is the start of the arc in degrees from the 
X-axis, rotating counter clockwise about the center 
of the screen. 

3. GAMA is the end of the arc in degrees from the X-axis, 
rotating counter clockwise about the center cf the 
screen. 
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Functional Description (Cont'd ) 

4. DEC is the chord length, in degrees. 

5. PNAME is the name of the location at which CIRCLE will 
start the new array. 

NOTE : 

1. Circles will only be produced if GAMA-THETA=360° . 

2. The array at PNAME will be as long as there are chords 
in the constructed arc. That is, the length at the 
array PNAME will equal the number of chords required 
to construct the arc — one chord per element. 
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\iT^A. (EDIT ^0jS0 ) 

Functional Description 

The device handler for the VW01 Sonic Digitizer Writing 
Tablet provides an interface between the user and the 
hardware. In general it conforms to the conventions of 
the Disk Operating System* as described in Disk Operating 
System, DEC-15-MZDA-D (prelim) . Initialize and input 
functions are initiated by standard user program commands 
(system macros) . The primary goal of the device handler 
is to relieve the user from writing his own device 
handling subprograms. 

1. .INIT (INITIALIZE) MACRO 

The macro .INIT causes the Writing Tablet to be initialized 
and must be given prior to any other I/O command referencing 
this device. 

The action taken by the .INIT software is the clearing of 
one software and two hardware flags. These flags are: 



1) Handler busy flag /Software 

2) Data Ready flag /Hardware 

3) Pen Data flag /Hardware 



The form is : 



.INITi_i[-]ds 



where : 



ds = .DAT slot number 



The expansion is: 

L0C+)3 CAL,_,[-]ds&777 

LOC+1 1 

LOC+2 000000 

LOC+3 000000 



/Function code for .INIT 



*VW01 will work in an Advanced Monitor Software System, 
as well. 
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Functional Description (Cont'd ) 



2. .READ MACRO 

The .READ macro is used for input to the user from the 

Writing Tablet. The input always consists of one 

status word and two words containing the X and Y coordinates 

respectively. 

The status word has the following format: 






1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


11 


12 


13 


14 


15 


16 


17 


1 


■ 


























V 




J 



•^Input Data flag 



Writing Tablet 
identifier bits 



Bit j2f = 

Bit 14 = 

15 = 

16 = 

17 = 





1 
1 
1 
1 

1 



The form is; 
Where : 



Input 
Input 
Input 
Input 
Input 
Input 



from "DATA READY" 
from "PEN DATA" 
from Writing Tablet 1 
from Writing Tablet 2 
from Writing Tablet 3 



from Writing Tablet 4 
. READ i_j[-]ds,m,buf add, w 

ds = .DAT slot number 
m = Data Mode 

J2( = Single Point 

1 = Single point multiplexed 

2 = Data input (not scan) 

3 = Data input multiplexed (scan) 
bufadd = Line buffer address 

points to a three word data buffer, 
w = Writina tablet to be selected (1-4) 



( 
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FUIlCt--LUnclX l^CSOJ-Xt^l-xUii v-^wni, ^/ 



The expansion is: 



LOC+0 
LOC+1 
LOC+2 
LOC+3 



CAL+10)2(JZf*mi_j[-]ds&777 



1 a 



/Function code for .READ 



buf add 
-w 



.WAIT MACRO 



( 



The .WAIT macro is only used with respect to the .READ. If 
a .WAIT is given the user program waits until the .READ 
has completed — that is, when the line buffer is filled and 
again available for the user program. If the line buffer 
is available, control is returned to the user immediately 
after the .WAIT macro expansion (LOC+2) . If the input 
of data has not yet been completed, control loops on the 
.WAIT macro. 

The form is: .WAITuj[-]ds 

where ds = .DAT slot number 



The expansion is: 



L0C+J2I 
LOC+1 



CALj_i[-]ds&777 
12 



/Function code for .WAIT 



4. .WAITR MACRO 

The .WAITR macro is only used with respect to the .READ. 
If the previous .READ is completed, control is returned 
to the user immediately after the .WAIT in order to 
proceed in line. If the input of data has not yet been 
completed, however, control is given to the location in 
the user program specified by the .WAITR call. 



The form is: 



.WAITRi_j[-] ds ,waitad 



( 
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Functional Description (Cont'd ) 



where : 



ds = .DAT slot number 

waitad = location in the user program to 

which control must be transferred 
if input is not completed. 



The expansion is: 



L0C+j2( 
LOC+1 
LOC+2 



CAh+100jli, 

12 

waitad 



[-]ds&777 

/Function code for .WAITR 



5. .FSTAT MACRO 

The .FSTAT macro has meaning only for directoried (i.e., file 
oriented) devices. On return, the AC will contain zero 
and bits j2l - 2 of LOC+2 will also be zero, stating that 
the device was non-file oriented. 



The form is; 
where : 



. FSTATi_j [- ] ds , namptr 

ds = .DAT slot number 

namptr = address of the first of three words 
containing the .SIXBT representation 
of the name and extension of a file. 



( 



The expansion is : 



L0C+j2f 
LOC+1 
LOC+2 



CAL+3j2lj2()2fuj[-]ds&777 

2 /Function code for .FSTAT 

namptr 



6. .CLOSE MACRO 

wnen action iidLn jjetJii j-nxuxai-cu. ^ • j-l^j-j. ciii>-i ,±\i:jjn.u/ , j.i_ m^wv. 
be terminated via the .CLOSE macro. The hardware flags 
(Data, Ready and Pen Data) will be cleared and the 
writing tablet (s) will be disabled in order to prevent 
illegal interrupts. 
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( 



The form is: .CLOSEu [-] ds 

where: ds = .DAT slot number 
The expansion is: 



L0C+i21 
LOC+1 



CALi_,[-]ds&777 

6 /Function code for .CLOSE 



7. IGNORED FUNCTIONS 

The following macros are ignored by the device handler 
for the VWj2(l Writing Tablet: 



1. 


.SEEK 


2. 


.ENTER 


3. 


. CLEAR 


4. 


.MTAPE 


5. 


.WRITE 


6. 


• TRAN 


7. 


•DLETE 


8. 


.RENAM 



8. INTERACTIVE ROUTINES FOR VWj2fl AND VT15 

In the Writing Tablet handler no tests are made on the 
incoming X and Y coordinates. All coordinates are directly 
transferred to the user. This means that if the pen stays 
on the same spot (Data Input mode) or is pushed on the 
same spot for more than once (Single point mode) the same 
X and Y coordinates are transferred to the user. He must 
not transfer these X and Y coordinates directly to the 
VT-handler because a hole could be burned in the display 
screen. For this reason, it is the user's responsibility 
to test for consecutive X and Y coordinates on one and the 
same spot. The number of times the same coordinates could 
be accepted depends on the intensity. 
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NRBOSS VIB (EDIT #J2I52 ) 

Patch to correct problems in closing Run Time Files & 
MICLOG being active on exit from BOSS-15 



( 



PROBLEM: 

On exit from BOSS via an EOF card the system was restored 
under the MICLOG regardless of the state of the system 
when BOSS was entered. As a result of this the system 
was unprotected (any user could modify the system, delete 
files, etc. ) . 

A $ card which was supposed to close all Run Time Files 
(RTF) did not do so. This was due to the mixup between 
the card image expected by the routine that decodes 
the card and the routine that reads the card in NRBOSS. 
A card with just the $ sign in column 1 gets mapped into $ sign 
followed by a "carriage return". The routine that decodes 
the card was erroneously expecting to see a card image 
of $ sign followed by a "space". 



SOLUTION: 

Use PATCH as shown below to make binary corrections to 
BOSS-15. This ensures that the system is restored to the 
user mode under the UIC that was current when BOSS was 
entered. Hence, it is not necessary for users to logout 
on exit from BOSS in case they entered it under the MICLOG. 
Users have to make note that they have to do a fresh 
login on exit from BOSS if they want to do privileged 
operations . 
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Patch to correct problems in closing Run Time Files & 
MICLOG being active on exit from BOSS-15 (Cont'd) 



$PATCH J 
PATCH V10A 
> B0SS15V 

> L 3273j~ PATCH2 

>)2f3273/541j2(43 > 541)?)Zf3 (ALT) SAD CR 

> L 5732^ 

>)?5732/777762 > 206271 (ALT) PATCHl LAC PL] 
> L 627lJ> 

>gf627 IjZf 1^00000 > 377762 (ALT) PLITl 377762 
> L 1703y 

>01703/106400 206400 (ALT) viB 

EXITV 



Bootstrap to refresh core, 



( 
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Patch to correct problem in assigning non-default file 
names in $CRT and $ADD procedure files 



ST J\\-/J_>XJ1 



( 



NRBOSS VlB does not permit usage of non-default file 
names in $CRT and $ADD procedure files. 



SOLUTION: 

The following patch corrects this problem: 
$ PATCH 



>B0SS15 
>L 2602 
>J2(26J2I2/20J3664> 

02603/1 il20 fS> 

026J34/6J32622> 

02605/777766> 

02606/04044 2 > 

02607/200557>106035 



JMS GT.CHR 



02610/105740>501035 


CR.LOP AND 


L77 


02611/541051>541003 


SAD 


CR 


02612/602624> 
02613/741200>541043 


SAD 


SPACE 


02614/102770>741000 


SKP 




02615/105776> 
02616/105747>106035 


JMS 


GT.CHR 



02617/440442> 



02620/602611>602746<ALT> 


JMP 


CR.LOP 


>L 2743 






02743/777766> 






02744/040442> 






02745/200557>106035 


JMS 


GT . CHR 
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Patch to correct problem in assigning non-default file 
n ame s in $CRT and $ADD procedure files (Cont'd) 



SAD CR 



J32746/I)2f574j3>501j2f35 EN. LOP AND L77 

j327 4 7/541j351>541jap 

)2(275^/6^2762> 

02751/741200>541043 



SAD SPACE 



j327 52/lJ2f2770>741J3P" 



SKP 



jZl2753/li35776> 
jZl2754/105747>lj36j2f35 



JMS GT.CHR 



j2(2755/44^442> 

ja2756/6J2f2747>6j32746<ALT> 
>L 17)33 

> 0n03/206A0j5>306'i00<AL'I> 
>EXIT 



JMP EN . LOP 



VIC 
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BOSS-15 VIA PROCEDURE FILES 

Correction to FOR and ASM to permit usage of the default 
file name 



BOSS-15 permits users to use the default file name 'FILTMP' 
in the $FOR and $ASM cards. This is not possible due 
to a bug in both these procedure files. 



( 



( 



SOLUTION : 

The following edit change corrects this problem. 

$MICLOG SYS 
$PIP 
DOSPIP V6C 



>T 



DPI 
DKi 



I DP I 
I DKI 



<CTP> 



FOR PRC,ASM PRC(A) 



DOS-15 V2A 

$EDIT 

EDITOR V18A 

>OPEN FOR PRC 

EDIT 

>L OA 

@A0i2f ( ) (3 

>C/(/ (FILTMP 

@Aj2lj3 (FILTMP) @ 

>C 

EDITOR V18A 

>OPEN ASM PRC 

EDIT 

>L @A 

^A00 ( ) @ 

>C/ (/FILTMP 

@AJ2lj3FILTMP)@ 

>E 
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Correction to FOR and ASM to permit usage of the default 
file name (Cont'd) 



DOS-15 V2A 

$PIP 

DOSEIP^VeC 



JDP) 



) DP 

<CTP>,^ <DK 



FOR PRC,ASM PRC(A) 



( 
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BOSS-15 VIA PROCEDURE FILES 

Correction to JOB procedure file to permit usage of 
default UIC 



PROBLEM: 

BOSS-15 permits users to use the default 'SRC' UIC in 
the $JOB command card. This is not possible due to an 
error in the $JOB procedure file. 



( 



SOLUTION: 

The following edit change corrects this problem. 

$A °p I <CTP> -14 

$EDIT 

EDITOR V18A 

>OPEN JOB PRC 

EDIT 

>F N 

N @D11()@ <SCR> @D14{)@ 

>C /SCR/@A(2f2(SRC)@ 

N @Dll()ia <@Aj2f2(SRC)@>Dl4()@ 

>E 



( 



Software Product 

BOSS-15 


Version 
VIA 


PROCEDURE FILES 


Version 

N/A 


Edit* 


Subprogram or Additiorwl Information 
JOB PRC 


Sequence * 

2 


PAGE 
1 OF 1 


New Replacement Article 

33 ZH 


Original Dutc 





e 



< 



( 



Printed in U.S.A. 



DEC-15-XSPSA-A-D 



